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ABSTRACT 



2. 

2.1 
2.2 

2.3 



3.1 



3.2 
3,2.1 



THIS DIAGNOSTIC MILL CHECKOUT MEMORIES OF NOVA/ECLIPSE 
COMPUTERS DESIGNED ARROUND 1 AND 4K MOS RAMS. 



MACHINE REQUIREMENTS 

ANY NUVA LINE OR ECLIPSE PROCESSOR 
2K OF REAO/lRITE MEMORY 
TELETYPE OR CRT 



OPERATING PROCEDURE 

THE DIAGNOSTIC CAN BE LOADED AND RUN IN A STAND-ALONE 
MODE AS WELL AS UNDER DTOS/EDTOS/PDTOS. 

STAND ALONE 

ON LOAOING THE PROGRAM VIA BINARY LOADER IT MILL AUTO 
START AT LOCATION 200, DURING TME FIRST PASS OPERATOR 
MILL BE ASKED TO SET THE "SWREG" I "USREG" OPTIONS. THE 
OPTIONS CAN BE SELECTED BY TYPING A NUMBER FOLLONEO BY A 
"RETURN" [THE RIGHT MOST 16 BITS OF THE NUMBER TYPED IN 
MILL BE ACCEPTED AS THE ANSWER), A "RUBOUV" MILL CAUSE 
THE QUESTION TO BE REPEATED, TYPING OF A "RETURN" ONLY, 
MILL DEPOSIT A IN THE OPEN OPTION LOCATION, 
IF BIT OF "USREG" IS SET THEN THE OPERATOR HAS TO 
DEFINE THE MEMORY BOUNDRIES TO BE TESTED IN WHICH CASE 
QUESTIONS REGARDING THE LOWEST MEMORY LOC„ TO BE TESTED 
"LOMEM", HIGHEST MEMORY LOC. TO BE TESTED "HJMEM", AND 
MAXIMUM MEMORY AVAILABLE "MXMEM" HILL BE ASKED, ANSWERS 
TO THESE QUESTIONS MILL BE OF THE SAME FOHM AS FOR 
"SWREG" AND "USREG", 

U BIT OF "USREG" IS NOT SET THEN THE PROGRAM MILL 
SELF SIZE THE MEMORY ANO THE ENTIRE MEMORY MILL BE 
TESTES. 

IN EITHER OF THE CASES "X - Y IS MEM TO TEST" MILL BE 
TYPED OUT, WHERE X ■ LOmEST LOCATION TO BE TESTEO AND Y 
HIGHEST LOCATION TO BE TESTED, CONTENETS OF MEMORY BETNE 
X AND Y EXCEPT THE PROGRAM ITSELF ANO 128 WOROS OF MINI* 
MONITOR FOR DTOS WILL BE DESTROYEO. 



UNDER OTOS/EDTOS/PDTOS 

RUN ALL 

UNDER THIS MODE THE PROGRAM RUNS WITH THE "USREG" SET 

TO A DEFAULT HOOE OF 0. 

PROGRAM LOAD 

ONCE THE PROGRAM HAS BEEN LOADED THE SAME PROCEDURE AS 

STAND ALONE MODE HAS TO BE FOLLOWED, 
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4. 



4.1 



4.2 



4.2.1 



4.3.1 



ERROR DESCRIPTION 

THE PROGRAM IS DESIGNED TO ENCOUNTER TWO TYPES OF ERRORS 

FATAL ERROR 

THIS HILL BE AN ERROR CAUSED BY SOKE THINGN OTHER THAN 

THE UNIT UNDER TEST, EXAMPLE OF THIS TYPE OF ERROR IS 

PROGRAM FLOW SEEING OUT SEQUENCE, 

A FATAL ERROR OVER RIOES THE SWITCH SETTINGS, THE ERROR 

MESSAGE IS PRINTED ON BOTH THE TTY • LPT (IF AVAILABLE), 

* THE PHOGRAM HALTS. THE PROGRAM SHOULD NOT BE CONTINUED 

AFTER A FATAL ERROR. 

SOFT ERROR 

THIS ERROR WILL BE REPORTED ON SEEING SOHE PROBLEM WITH 
THE UNIT UNDER TEST. AFTER REPORTING THE ERROR THE PROG- 
RAM WILL ACT ACCORDING TO THE SETTINGS OF THE "SWREG", 
THE PROGRAM CAN BE CONTINUEO AFTER A HALT ON SOFT ERROR, 

SOFT ERROR FORMAT 

ON SEEING A BIT FAILING FOR THE FIRST TIME AN ERROR WITH 

THE FOLLOWING FORMAT WILL BE REPOHTEOI 

BOATA - GDATA • LOC « TSTNM . PC 

WHERE BDATA IS THE BAD OR FOUND DATA 

GDATA IS THE GOOD OR EXPECTED DATA 

LOC IS THE ADDRESS OF THE FAILING LOCATION 

TSTNM IS THE TEST NUMBER 

PC IS THE PC WHERE THE ERROR MAS DETECTED 

ERROR HISTORY 

ON COMPLETION OF A PASS ERROR HISTORY OF THE FAILING BIT 

BE REPORTED UNLESS "SwREG" IS SET TO SUPPRESS THE END OF 

PASS TYPE OUT, IN WHICH CASE THE INFORMATION WILL BE 

COLLECTED UNTILL IT IS OBTAINED BY HITTING ANY TTY KEY. 

ERROR HISTORY WILL BE FOR THE TIME SINCE IT MAS REPORTED 

LAST. 

ERROR HISTORY FORMAT 

THE ERROR HISTORY WILL BE REPORTED IN THE FOLLOWING FORM 

BITNM - QUAD - BANK - ERTMS 



BITNM 
QUAD 



ERTMS 



IS THE FAILING BIT NUMBER (0-15) 

IS THE IK QUADRANT OF THE MEMORY BANK 

EACH BANK IS DEVIDEU INTO 4 QUADRANTS, 

LOCATION WILL BE REPORTED IN Q0 OF B0 

IS THE BANK NUMBER 

THE HEMORY IS 06VIOEO INTO 4K BANKS 

BANK IS 0.7777, BANK I IS 10000-17777 

SO ON, 

IS THE NUMBER OF TIMES THE BIT FAILED 

REPORTED IN DECIMAL. 

HIGHEST NUMdEK REPORTED HILL BE 32767, 
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switch settings 

location "swreg" is used to select the program options 
(not svsteh configuration), nhile running unoer otos/ 
pdtos/eotos this location will be loao«d by the monitor 
however under stand alone and program load mooes this 
location will be set according to the answer supplied 
by the operator, 



5,1 SWITCH OPTIONS 

DIFFERENT BITS ANO THEIR INTERPRETATION AT LOCATION 
•SWREG" IS AS FOLLOWS! 

BINARY INERPRETATION 
VALUE 

LOOP ON ERROR 

SKIP LOOPING ON ERROR 

PRINT TO CONSOLE 

ABORT PRINT OUT TO CONSOLE 

PRINT DETAILED ERROR ON THE 

SELECTED DEVICE/DEVICES 

ABORT ERROR PRINT OUTS 

ALLOW END OP PASS PRINT OUT 

SUPPRESS END OP PASS PRINT OUT 

DO NOT PRINT ON THE LINE PRINTER 

PRINT ON THE LINE PRINTER 

DO NOT HALT ON ERROR 

HALT ON ERROR 



5.2 USER'S OPTIONS 

LOCATION "USREG" IS USED TO DEFINE ONE OP THE FOLLOWING 
OPTIONS! 

BINARY INTERPRETATION 

VALUE 

CHECK THE ENTIRE MEMORY 

MEMORY BOUNDRIES MILL BE OEPINED 

BY THE OPERATOR, 

MEMORY BOARD IS OESISNEO ARROUND 

IK RAMS OR DGIS 4K RAMS 

MEMORY BOARD IS DESIGNED ARROUND 

OTHER 4K RAMS, 

ALLOW THE RELOCATION OF THE PROG 

TO THE HIGHEST AVAILABLE MEMORY, 

SUPPRESS RELOCATION 

ONLY ROW/COLUMN GALLOPING TEST 

IS TO BE PERFORMEO, 

ENABLE LONG GALLOPING TEST 

DO NOT LOOP ON A TEST 

LOOP ON THE TEST SPECIFIED BY 

BITS 12*19 

TEST NUMBER. 

ONLY TEST DEFINED BY BITS 12-15 

THROUGH THE LAST TEST HILL BE 

EXECUTEO, 



BIT 

1 


OCTAL 
VALUE 


B 

V 






40001 


1 


2 




• 




20000 


1 


3 









10000 
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4 









R4000 


1 


5 









02000 
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01000 


1 



BIT(S) 


OCTAL 
VALUE 


B 
V 





100000 
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1 









040000 
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020000 
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010000 
000020 
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6. 



7.1 



TTY COMMANDS 

ANY KEY "ILL CAUSE THE ERROR HISTORY TO BE TYPED OUT, 
THE PROGRAM MILL CONTINUE RUNNING, 

»D THIS COMMAND GIVEN AT ANY TIME HILL RESTART THE 
PROGRAM AND THE SWITCH OPTIONS HILL BE ASKEO, 

AC THIS COMMAND GIVEN AT ANY TIME KILL CAUSE THE 
PROGRAM TO GET RELOCATED bACK TO ITS ORIGINAL 
CORE AND HALT, 

A CONTINUE AFTER »C WILL START THt PROGRAM HITH 
THE PREVIOUS SETTINGS OF THE OPTINS, 
THE PROGRAM CAN BE STARTED AT 200 TO RESET THE 
OPTIONS, 



PNOGRAM DESCRIPTION 



THE DIAGNOSTIC 
RAMS AND THt CI 
EU BY DATA GENE 
THE TEST STARTS 
AS IT PROGRASSE 
IF THE RELOCATI 
STOPPED IN THE 
COMHAND IS USED 
A TEST CAN NOT 
INORDER TO GO T 
STORED AT "USRE 



IS at 

KCUIT 

KAL A 

KITH 

s hor 

ON IS 

MIOOL 

TO S 

BE ST 

A 5 
G». 



SIGNED TO CHECK OUT 1 AND 4K MOS 

RY ARHOUND THEM. 4K RAMS MANUFACTURE 

RE TREATED AS 4 IK RAMS, 

THE CHECKING OF SIMPLE HARDWARE AND 
E AND MORE COMPLEX TESTING IS DONE, 

ALLOWED THEN THE PROGRAM CAN NOT BE 
E AND RESTARTED AT 200 UNLESS A TTY 
TUP THE PROGRAM, 

ARTED IN THE MIDDLE OF THE PROGRAM, 
PECIFIC TEST PROPER VALUE SHOULO BE 



END OF PASS 

ON COMPLETIUN OF A PASS WORDS "« PASS" WILL BE 

PRINTED, C* IS THE PASS NUMBER OF THE DIAGNOSTIC IN 

DECIMAL), 

.ENOC 



00*02 001744 IHSTRYS 

00003 0005a2 IRESTR! 

00004 000000 RTINOi 



10006 MUSME 

01 080001 

02 000000 

03 0019000 

04 00000 001772 
05 

06 000002 
07 



08 
IB 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
2b 
27 
26 
29 
30 
31 
32 
33 
34 
35 
3b 
37 
36 
39 
4B 
41 
42 
43 
44 
45 
46 
47 
4b 
48 
30 
31 
32 
33 
34 
35 
3D 
37 
38 
39 
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.NOCON 1 

.NOLOC 

.LOC 
DIRT 

• LOC 2 

(•OCTAL ACCEPT ROUTINE 

r ...................... 

i* 

(•THIS ROUTINE IS USEO TO ACCEPT OCTAL INPUTS FROM 

(•THE OPERATOR. 

(•ALL OF THE ACCUMULATORS ARE DESTROYYED. AC3 RETURNS 

(•WITH A AFTER A "CR", 

(• 

HSTKY+1 

RESTR 





00005 
00006 
00007 

00011 
00012 
00013 
00014 
00015 
0001b 
00017 
00020 
00021 
00022 
00023 
00024 
00025 
00026 
00027 



034004 T1NOI 

006371 

136640 

000240 

132400 

063610 OPR1N1 

000012 

060610 

034166 

163400 

006167 

034165 

116405 

002004 

034004 

024047 

106000 

020113 

106032 



00030 001772 

00031 151120 

00032 151120 

00033 151120 

00034 132000 
00U35 000012 

00036 031437 TOCATl 

00037 051442 

00040 025435 

00041 045441 

00042 024045 



STA 
JSR 
.TXTE 

SUB 

SKPDN 

JMP 

DIAC 

LOA 

AND 

JSR 

LDA 

SUB 

JMP 

LOA 

LOA 

ADC 

LOA 

AUCO* 



3.RTIN0 
PINES5 
/ ■ / 

2.2 

TTI 
.-t 

b.tti 

S.N177 
3,0 

PIPRINT 

3,N13 

0,3, SnR 

•RTINO 

3,RTINO 

1,N6« 

e.i 

B,M77767 
0,1, SZC 



-6,3 



MOVJL 
MOVZL 
MOVZL 
ADC 

JMP 


2,2 
2,2 
2,2 
1,2 

OPRIN 


STA 


2,CC,3 


STA 


2,CA,3 


LDA 


l,Cd, J 


STA 


1,CJ,3 


LOA 


l.IcGGS 



(SAVE THE RETURN ADDRESS 



(AC2 WILL RECEIVE THE INPUT 



(WAIT 


FOR THE 


INPUT 


(READ 






(ACS » 


177 




(STRIP 


THE PARITY BIT 


(ECHO 


THE RECEIVED CHARACTER 


(ACS • 


19 




(SKIP 


IF NOT A 


RETURN 


(ACS ■ 


CALLING 


LOCATION *l 


(AC1 • 


ee 





(AC0 ■ 177787 

(IF AN OCTAL NUMBER MAS TYPED 
(THEN AC1 SHOULO HE BETNEEN 
I17777B AND 177777 
(IN CASE OF ILLEGAL CHARAC- 
TER RETURN TO ASK THE QUEST- 
(ION AGAIN 



(LOAD AC2 

(GETT THE NEXT CHARACTER 

(STORE AC2 IN ■HIGHN" 

(CC • HIGHM-(CALCAT*S) 

(DEFINE THE NEW MAX, MEM, FOR 

(PROGRAM RELOCATION USE 

(CA • MXMEM-CCALCAT*!) 

(LOAD ACl WITH "TEMPA" 

(CB « TEMPA-(CALCAT*l) 

(STORE AT "ENDPRG" 

ICO ' EnOPRG-CCALCAT*!) 

(ACl • 375 



etier mosme 






1 00U43 15481181" 


too 


1.2 


2 00044 U01004 


JMP 


4.2 



(START THE CAT 



10008 MUSME 








01 


K00045 




.LOC 


43 


02 d0t>45 


000375 


IESSS1 


EGGS 




03 i)0|a4t> 


"10.1000 


8TCNTI 







04 081047 


0»0«M 


M60I 


80 




05 










06 


000050 




.LOC 


50 


("7 00050 


aff^Ria 




.BLK 


s. 


06 










08 










10 






(•MtMORT SIZING ROUTINE 


11 






!• 




12 










13 0006)9 


054261 


SIZEI 


3TA 


3.LOHEM 


14 00061 


030002 




LD» 


2.IM3TRY 


15 00062 


151400 




IMC 


2.2 


16 00063 


025001 




LOA 


1.1.2 


17 00064 


134000 




CQH 


1.3 


lb 00069 


055001 




5T» 


5.1.2 


IS 00066 


021001 




LO* 


0.1.2 


20 00067 


045001 




ST» 


1.1.2 


21 00070 


050262 




3TA 


2.HIHEH 


22 00071 


151513 




INCL» 


2.2.SNC 


23 00072 


116414 




SUB* 


0.3.SZR 


24 00073 


000253 




JMP 


HAXSV 


25 00074 


000062 




JMP 


SIZE*2 



(RESERVED FOR DEBUGGER'S U»E 



»*LONEH« • 

MC2>EN0 OF THE PHOGRAH 

(SAVE 

("RITE 

(READ THE LOCATION NRITTEN INTO 

(RESTORE 

(SKIP AFTER REACHING 32K BOUNDRT 
(SKIP IF SUING IS NOT OVER 



sub 
st* 

SUB 
ST* 
ST* 
LD* 
ST* 
LD* 
MUV 
JMP 
ST* 
JSR 



001U 000000 bank: 



100149 M05ME 

til 

as 

06 
06 

a; 

36 

09 

It) 

11 

12 0807b 152400 EKSUH: 

IS 0007S 050113 

14 00077 10S400 ENSB0: 

lb 00100 05>9112 

It. 00101 040111 

17 00102 020374 

IB 00103 040046 

19 00104 032004 tKSMU 

20 00103 151005 

21 00106 000U7 

22 00107 050114 

23 00110 W06174 
24 

25 0011 1 000000 BITNH: 
20 

27 00112 000000 QU*D! 

2a 
29 
30 

31 00114 000000 EHTHS: 

32 0011b 177767 M777671 ANOCS 
33 

34 
3b 

36 00116 052004 

37 00117 010004 
36 00120 010111 

39 00121 014046 

40 00122 000104 

41 00123 024112 

42 00124 12S237 
43 

44 0012b 131401 
4b 00126 010113 

46 00127 034113 

47 00130 177120 
46 00131 157300 
49 00132 177124 
50 

51 00133 024262 

32 00134 136052 
33 

54 0013b 000077 
3b 

36 00136 006174 EuP: 
37 

36 00137 00000B INPAS 

59 00140 126320 

60 00141 006371 



(•ERROR SUMMARY ROUTINE 
;*.-....„............„. 

(• 

r*THlS RUUTINE IS USED TO PRINT ERROR SUMMARY EITHER 

(•AFTER COMPLETION OF A PASS OR WHEN REQUESTED BY THE 

(•OPERATOR THROUSh A TTY KEY. 

(•THIS CODE CAN ONLY BE EXECUTED "HEN THE PROGRAM 

MIS RESIDING IN THE LOkER CORE. 

I* 



JMP 



JSR 



SUBZL 
JSR 



2.2 

2, BANK 

0,0 

2, QUAD 

0,BITNM 

0,N20 

0.BTCNT 

2,»RTINC 

2,2,SNR 

EKTMS»3 

2.ERTM5 

#IPDEC 



3, 3.SBN 



ST* 


2,#RTIN0 


ISZ 


RTINO 


ISZ 


BITNM 


OSZ 


BTCNT 


JhP 


ERSM1 


LD* 


1,3UAD 


MOVZR» 


1, If SBN 


INC 


If 2rSKP 


ISZ 


BANK 


LD* 


3fB»NK 


»OOZL 


3,3 


«DD6 


2,3 


40DZL 


3,3 


LU* 


lfHIMEM 


ADCUS 


1,3, SZC 



•IPOEC 



1,1 

HMfcSS 



("QUAD" ■ UUAORANT NUMBER 



(AC2»ERR0R COUNT FOR ONE BIT 
(SKIP IF THIS BIT EVER FAILED 



(PRINT THE HISTORY OF FAILURE 

l*NO RETURN ,*5 

(THIS LOCATION HILL HAVE THE 

(FAILING BIT NUMBER 

IUU4DRANT OF THE FAILIN BANK 

(C* QUAORANT'IKJ 

(THIS LOCATION MILL HAVE THE 

(FAILING BANK NUMBER (A BANK»4K) 

(NUMBER OF TIMES THIS BIT FAILED 

(BIT OF THIS LOC. SHOULD BE 

(I, M77787 ■ 177767 

(NEXT LOCATION MILL NEVER BE 

(SKIPPED 

(CLEAR ERROR COUNTER 

(CHECK THE NEXT BIT 



(SKIP IF QUADRANT 3 HAS BEEN 
(CHECKED 



(AC3 • LOHEST ADDRESS IN THE 
(NEXT MEMORY QUAD, 
1ACI"T0P OF THE MEMORY 
(SKIP IF ERROR STACK FOR HEM. 
(UNDER TEST HAS BEEN CHECKED 



(PRINT THE PASS NUMBER 
(AND RETURN KITH AC2 ■ 



IAC1 > 1 

(PRINT END OF PASS 



0010 MOSME 
41 
92 00142 050240 

03 051301 

04 120123 

05 000240 

06 00146 034045 TERn: 

07 00147 021400 

08 00130 06.5710 

09 00151 070610 

10 00132 101004 

11 00133 000332 

12 00154 034166 

13 0015b 173420 
14 

lb 00136 127120 

16 00157 146654 

17 00160 000340 
16 00191 146419 

19 00162 000200 

20 00163 063077 

21 00164 000260 
22 

23 00165 000015 NIS: 

24 00166 400177 N177I 
23 00167 001712 IPRINTI 



.TXTE / P*S4 / 



LD* 


3.XE.GSS 


LD* 


0,0,3 


SKPUZ 


TTI 


DI*C 


2, TTI 


MOV 


0,0, SZR 


JHP 


RTRN-2 


LD* 


S.N177 


• NOZ 


»,2 


»DUZL 


1,1 


SUBURB 


2,1, SZR 


JMP 


CUNT 


SUBO 


2,1,,SnR 


JMP 


START 


H»LT 




JMP 


SIZED 


lb 




177 




PRINT 





(RETURN KITH AC0 II AC2 • 



(UNDER DTDS 1 



(READ THE TTI KEY 
(SKIP IF NOT 



(6ET RID OF THE PARITY BIT AND 

(SET THE CARRY BIT TO 

(AC! • 4 

(SKIP IF IT IS «C OR «,0 

(SKIP IF IT IS *C 



leen musme 








01 


180170 




.LOC 


170 


02 










03 










04 






(•STARTING OF THE PROGR 


05 






1* 




86 










87 00170 


102441 


Off I 


SuSO 


0,0, SKP 


88 00171 


102000 


ONI 


aoc 


0,0 


89 08171: 


040377 




S1A 


0.CATSM 


IV 88173 


BBeja^K 




JMP 


START 


11 










12 88174 


081636 


IPDECi 


POEC 




13 88175 


801642 


IPDCTl 


poct 




14 










15 


000200 




.LOC 


200 


16 










17 00201? 


060277 


STAKTl 


InTDS 




18 88281 


152400 




sua 


2,2 


18 80282 


155520 




INCZL 


2,3 


20 80283 


020375 




LB* 


0,ES6S 


21 80204 


101004 




MOV 


0,0, SZR 


22 00205 


000224 




JmP 


UNDTS 


23 B0206 


040574 




ST* 


0,S»REG 


24 00207 


006371 




JSP. 


•IHESS 


25 88210 


805215 




.TXTE 


/<15><12>SMREG/ 


26 


153323 








27 


142722 








28 


008107 








29 00214 


004003 




J58 


TINO 


30 00215 


050137 




STA 


2.INPAS 


31 00216 


006371 




JSR 


HMESS 


32 0021/ 


003215 




• TXTE 


/<15»«12>USREG/ 


33 


031323 








34 


142722 








35 


000107 








36 00223 


004005 




JSR 


UNO 


37 00224 


050537 


UNOTSl 


STA 


2,USRES 


38 80225 


151113 




MOVL» 


2.2.SNC 


39 










40 










41 00226 


000060 




JMP 


SIZE 


42 00227 


006371 


OTHINS 


JSB 


•IMESS 


43 










44 00230 


005215 




.TXTE 


/<15»<12>L0MEM/ 


45 


147714 








46 


142315 








47 


000115 








48 00234 


804005 




JSR 


TINO 


49 00235 


050261 




STA 


2,U0MEM 


50 00236 


006371 




J5R 


•IMESS 


SI 










52 00237 


005215 




.TXTE 


/<15><12>HIHEM/ 


53 


144510 








54 


142515 








55 


000115 








56 00243 


004005 




JSR 


TINO 


57 00244 


050262 




ST* 


2,HIMEM 


SB 00245 


006371 




JSR 


•IMESS 


S0 










60 00246 


005215 




.TXTE 


/<15>«12»MXNEH/ 



(SET TO 
(SET TO -1 



(ACS • 2 

(UNDER DTOS ? 
ISKIP IF NOT 



(ASK FOR THE OPTIONS 



(TEMPORARILY SAVE THE "SHREG" 
IASK FOR THE OTHER OPTIONS 



IAC2 • USKEG 

(SKIP IF THE MEMORY BOUNDRIES 

(ARE TO BE DEFINED 

(ASK FOR THE LOHEST MEMORY TO BE 
(TESTED 



(ASK FOR THE HIGHEST MEMORY TO B 
(TESTED 



(ASK FOR THE MAXIMUM AVAILABLE 
(MEMORY 



0012 MUSME 






01 


154115 






02 


142513 






03 


000115 






04 00252 


004005 


J5R 


TINO 


85 00253 


050536 MAXSVI 


STA 


2,MXMEH 


06 








87 08254 


030137 


LOA 


2.INPAS 


08 00255 


«34375 


LOA 


3, EGGS 


09 00256 


175005 


MOV 


3,3,SNK 


10 








11 00257 


830323 


STA 


2, SHREG 


12 00260 


006175 SIZEOI 


JSR 


•IPOCT 


13 00261 


000000 LOMEMl 







14 00262 


007777 HIMEMI 


7777 




15 00263 


177400 C377I 


AND 


3,3 


16 








17 00264 


K06371 


JSR 


•IMESS 


18 00265 


144640 


.TXTE 


/ IS HEM 


19 


120123 






20 


142515 






21 


120113 






22 


147724 






23 


152240 






24 


031703 






25 


000324 






26 00275 


040137 


STA 


0,INPAS 


27 00276 


034002 


LOA 


3,IHSTRY 


26 








29 00277 


838261 


LDA 


2.L0MEH 


30 00300 


050503 


STA 


2,L0«M 


31 00301 


030262 


LDA 


2.HIMEM 


32 00302 


050504 


STA 


2,HIGHH 


33 00303 


024166 


LOA 


I.N177 


34 00304 


151300 


MOVS 


2,2 


35 00305 


133620 


ANDZR 


1,2 


36 00306 


150240 


COMOR 


2,2 


37 00307 


024374 CLEANI 


LDA 


1,N20 


3b 00310 


041400 


STA 


0,0,3 


39 00311 


175400 


INC 


3,3 


40 00312 


106004 


ADC 


0,1, SZR 


41 00313 


080310 


JMP 


,-3 


42 00314 


151404 


INC 


2,2,SZR 


43 00315 


800307 


JMP 


CLEAN 


44 08316 


054466 


STA 


3,TEHPA 


45 








46 00317 


030472 


LDA 


2,MXMEM 


47 00320 


024375 


LOA 


1,EGGS 


48 08321 


125004 


MOV 


1,1, SIR 


49 00322 


024166 


LDA 


1.N177 


58 00323 


020377 


LDA 


0,CAT3H 


51 00324 


101004 


MOV 


0,0, SZR 


32 07325 


024372 


LDA 


1,N1777 


33 00326 


132400 


SUB 


1,2 


34 00327 


124001 


COM 


1,1, SKP 


55 00330 


131400 


INC 


2,2 


56 00331 


021000 


LDA 


0,0,2 


57 00332 


041400 


STA 


0,0,3 


58 00333 


175400 


INC 


3,3 


58 00334 


125404 


INC 


1,1, SZR 


80 00335 


000330 


JMP 


.-5 



(SAVE THE HIGHEST AVAILABLE 

(MEMORY ADORESS 

(READ THE SHREG OPTIONS 

(SKIP IF DTOS HAS SET THE 
("SHREG" 

(PRINT ANO RETURN ,«3 
(LOHEST LOCATION TO BE TESTED 
(HIGHEST LOCATION TO BE TESTEO 
(BIT OF THIS LOCATION SHOULD 
(BE 1, (C377 • 177410) 



(HAKE THE PASS COUNTER • 
(AC3 • ADDRESS OF THE POINTER 
(TO THE ERROR HISTORY LOC, 

(HAKE A COPT OF LOH MEM, 



(ACl ■ 177 



(AC2 • TOTAL NUHBER OF IK QUAD, 

(ACl • 20 

(CLEAR THE ERROR HISTORY LOC, 



IOECREMENT ACl 



(SAVE ENO OF THE ERROR HISTORY 
(COLLECTING LOCATIONS 
(AC2 • HAXIHUH HEHORT 

(SKIP IF NOT UNDER DTOS 
(ACl ■ 177 

(SKIP IF CAT IS OFF 
(ACl ' 1777 



(SAVE THE CAT PROG./HINI HONITOR 
(ALONG HITH THE HAIN PROG, 

(SKIP AFTER SAVING ALL 



0013 Ml) 


5ME 








91 09J3e> 


¥154452 




ST» 


3.F-N0PRG 


812 










93 09337 

94 

95 18934a 


099347 




JMP 


CONTI 


030451 


CONTI 


LD» 


2,MXMEM 


90 119341 


034372 




10* 


3.N1777 


97 (19342 


172900 




ADC 


3,2 


98 09343 


020377 




LO* 


B.CATSh 


98 119344 


934137 




ID* 


3.INPAS 


1 Id 1)9345 
11 

12 190346 


163155 




»U0OL* 


3.0.SNR 


004936 


CAICATI 


JSR 


T0C4T 


13 09347 


102490 


CONIll 


sua 


0,0 


14 00350 


040442 




sr* 


0.RELTG 


15 09351 


O020H3 




JMP 


♦IRESTR 


16 










17 










16 99352 


015403 




05Z 


3,3 


19 00353 


000349 




JMP 


CONT 


29 00354 


021403 


RTRNI 


IDA 


9,3,3 


21 0935S 


031404 




LD« 


2.4,3 


22 09356 


024434 




LDA 


1,RELTG-,, 1 


23 










24 










25 00357 


125414 




INCH 


1,1, S*R 


26 00360 


024703 




LD» 


I.C377-..1 


27 99361 


941376 


MMRSTR1 


5TA 


0,-2,2 


28 00362 


125405 




INC 


1,1, SnR 


29 










30 00363 


001909 




JMP 


0,2 


31 00364 


014424 




OSZ 


ENOPRG 


32 09365 


036423 




LDA 


3,»ENDPHr, 


33 09366 


056423 




S1A 


3,»MXMEM 


34 00367 


014422 




osz 


MXMEM 


35 90370 


000771 




JMP 


MMRSTH-,,1 


36 










37 99371 


001611 


IMESSl 


MESS 




38 00372 


001777 


N1777I 


1777 




39 00373 


007777 


N77771 


7777 




40 00374 


000029 


N20I 


20 





("ENDPRG" MAS THE FIRST LOCATION 
(THAT CAN BE TESTED 



(SKIP IF CAT IS OFF OR IT IS 
INOT PASS 1 



(NOT DONE rET 

IAC0 ■ PASS COUNT 

(SET THE RETURN ADDRESS 

IAC1 « -1 IF THE PROGRAM IS 

(RESIDING AT THE TOP UF THE 

(MEMORY AND OTHERWISE 

(AC1 ■ -377 

(SAVE PASS COUNT FOR OTOS 

(SKIP UNTIUU TOP 376 WORDS ARE 

(RESTORED 

(BACK TO OTOS 

(RESTORE MINI-MONITOR 



10014 MUSME 

01 

02 00375 000909 ESGSI 

93 90376 000000 

04 00377 0090O0 CATSHI 

05 090400 PASS* 
96 90400 000001 

07 

08 00401 

99 



999401 RtTURNi 
090901 
090402 SftREG' 



10 00402 900001 



11 



000403 USREG» 



12 00403 O»O001 



890404 TEMPA> 



14 00404 ii9O00l 



t.90405 LOHM' 



16 00405 000991 



17 



003406 HIGHMi 



16 00406 090901 



19 



000407 BKPATt 



20 00407 090001 

21 000410 ENDPRG" 

22 00410 009901 

23 09O4U MXMEMI 

24 00411 O00001 

25 000412 RELTG' 

26 00412 k'P000t 

27 B0O437 TSTAD" 



.BIK 



BLK 
437 



10015 mqsme 


ei 




00X440 


as 






93 


00440 


004017 N|7I 


04 






05 






06 






07 






06 






as 






10 






11 






12 






13 


00441 


020742 RELCT: 


14 


00442 


103100 


IS 


00443 


176000 


16 


00444 


101102 


17 


00445 


000420 


16 


00446 


034742 


IB 


00447 


126000 


20 


00450 


137000 


21 






22 


00451 


171000 


23 


00452 


020737 


24 






25 


00453 


010737 


26 






27 






26 


00454 


115001 


29 


00455 


111001 


30 


00456 


044734 


31 






32 






33 


00457 


021000 


34 


00460 


041400 


36 


00461 


133043 


3b 


00462 


137042 


37 


00463 


000402 


36 


00464 


000773 


38 






40 


00465 


030002 ENOPASI 


41 


00466 


050004 


42 






43 


0046/ 


063610 


44 


00470 


010137 


4b 






46 






47 






46 






49 


00471 


020711 


50 


00472 


024540 


51 


00473 


123405 


52 






53 


80474 


175414 


54 






56 






56 


00475 


063710 


57 






56 


00476 


000075 


58 






60 


00477 


031403 



.IOC 440 

17 

(•RtLOCATt ROUTINE 
I ......... — ...... 

r» 

(•this routine is used to relocate the program from 
(•lou to high, and high to l0« core. if the program 
mis relocated from high to low core then error 
(•Summary and end of pass is reported. 



LDA 

AUDL 

ADC 

MOVL 

JMP 

LUA 

ADC 

ADO 

MOV 
LDA 



MOV 
MQV 

STA 



LDA 

STA 

AUDO 

AODO 

JMP 

JMP 

LDA 
S1A 

5KP0N 
152 



INC* 



0,USR6G-,,1 

0,0 

3,3 

0,0, SZC 

ENDPAS-,,1 

3,EN0PRG-,,l 

1,1 

1,3 

3,2 

0,MXMEM-,,1 

RELTG-,,1 



0,3,SKP 
0,2,SRP 
1, RELTG-,,1 



0,0,2 
0,0,3 
1,2,SNC 
1,3, SZC 
.♦2-..1 
.-5-,, I 

2.IHSTRY 
2.RTIN0 

TTI 

INPAS 



LOA 


0,SWREG-.,1 


LDA 


1,N4000-,, 1 


AND 


1,0, SNR 



3,3,SZR 



SKPUZ 


TTI 


JMP 


EKSUM 


LOA 


2,X,3 



(SEE IF RELOCATION IS ALLOWED 



(SKIP IF SO 



(ACl • .J 

IAC3 • NUMBER OF LOCATIONS 

(OCCUPIED BY THE PROGRAM 

IAC0 • HIGHEST AVAILABLE 

(MEMORY 

(CHECK IF THE PROGRAM IS GOING 

(TO BE RELOCATED TO THE HIGHER 

(CORE OR TO THE LONER. 



("RELTG" IS •! IF THE PROGRAM 

(IS GOING TO BE EXECUTED FROM 

(THE HIGHER CORE, OTHERWISE, 

(READ 

(NR1TE 

(DECREMENT 

(SKIP IF THE END IS NOT REACHED 



(PREPARE FOR ERROR SUMMARY PRINT 
(OUT 

(INCREMENT THE ABSOLUTE LOC. 
("INPAS", IF THE PROGRAM HAS 
(BEEN RELOCATED TO THE HIGH 
(CORE THEN THIS INC, WILL BE 
(IGNORED. 

(AC1 • 4000 

(SKIP IF END OF PASS TYPE OUTS 
(ARE SUPPRESSED (BIT 6) 
(A PASS IS COMPLETE AFTER RES- 
TORING THE PROGRAM BACK TO 
(THE LOWER CORE 
(END OF PASS MILL ALSO BE 
(TYPED IF A KEY HAS BEEN HIT 
(GO TO THE ABSOLUTE ADDRESS 
(OF ERROR SUMMARY ROUTINE 
(AC2 * RESTR.0 



0016 MOSME 






01 








02 00500 


173000 


ADO 


3,2 


03 00501 


001000 


JMP 


0,2 


04 








05 00502 


030671 RESTRl 


LDA 


2,N7777-,,1 


06 00503 


172452 


SUBO* 


3,2,SZC 


07 00504 


155000 


MOV 


2,3 


08 00505 


030701 


LOA 


2,HIGHM-.,1 


»9 00506 


172452 


SUBO* 


3,2,3ZC 


10 








11 00507 


155000 


MOV 


2,3 


12 00510 


024700 


LDA 


1,ENDPRG-,,1 


13 








14 00511 


020701 


LOA 


0, RELTG-,,1 


15 








16 








17 00512 


101405 


INC 


0,0, SNR 


16 00513 


171001 


MOV 


3,2,SKP 


19 00514 


121001 


MOV 


1,0, SKP 


20 00515 


024670 


LOA 


1,L0WM-.,1 


21 








22 00516 


132052 


AOCOAt 


1,2,SZC 


23 








24 00517 


000722 


JMP 


RELCT-,,1 


25 00520 


024665 


LOA 


1,L0WH-,,1 


26 00521 


106452 


SUBO* 


0,1, szc 


27 








26 00522 


105000 


MOV 


0,1 


29 00523 


044575 


STA 


1,BTHEM»,,1 


30 00524 


050575 


STA 


2,TPMEM»,,1 


31 








32 








33 00525 


030713 


LOA 


2.N17-.,! 


34 00526 


024655 


LOA 


1,USREG-,,1 


35 00527 


000420 


JHP 


SEND-,,1 


36 








37 00530 


024500 NEXT 1 


LB A 


1,0TSTNM-.,1 


36 00531 


137000 


AUO 


1,3 


39 








40 00532 


025400 


LOA 


1,0,3 


41 








42 00533 


132415 


SUB* 


1,2, SNR 


43 00534 


000410 


JMP 


NXTl-,,1 


44 00535 


005412 


JSP. 


B0,3 


46 








46 UP536 


005215 


,TXTE 


/«15»«12»S£Q 


47 


142523 






46 


120321 






49 


151305 






50 


000322 






51 00543 


063077 


MALT 




52 00544 


020630 NXTH 


LUA 


0,N20-.,1 


53 00545 


034636 


LDA 


3,USREG-.,1 


54 00546 


163404 


ANO 


3,0,SZR 


55 








56 00547 


133405 5LNU1 


ANO 


1,2, SNR 


57 00650 


151400 


INC 


2,2 


50 00551 


102401 


SUB 


0,0, SKP 


59 00552 


010635 RITISi 


ISZ 


BKPAT-,,1 


60 









(X • IRESTR-B 

(AC2 > RELOCATED ADDRESS OF "RES 



(AC2 • 7777 



(AC2 • HIGHEST MEM, TO TEST 
(SKIP IF AC2 IS MORE THAN 
(AC3 

(AC1 • 1ST LOC. THAT CAN BE 

(TESTED 

IAC0 WILL OETERMINE IF THE 

(PROGRAM IS IN A RELOCATED 

(STATE OR NOT 

(SKIP IF NOT RELOCATED 



(AC1 • LOWEST MEM, TO SE 

(TESTED 

(SKIP IF AC2 IS MORE THAN 

(AC1 



(SKIP IF AC1 IS EQUAL OR MORE 
(THAN ACS 



(TOP OF THE MEM, THAT WILL 

(BE TESTEO WHILE THE PIIOG, 

(IS IN THIS STATE 

(AC2 • 17 

(READ THE USER'S OPTIONS 



(AC1 • TSTNM.NXTST 

(ACS IS POINTING TO THE TEST 

(NUMBER 

(AC1 • TEST NUMBER THAT WAS JUST 

(EXECUTED 

(CHECK FOR PROPER TEST SEQUENCE 

(GO TO THE MESSAGE TYPE-OUT 
(ROUTINE 
ERR/ 



1*00 ■ 20 



(SKIP IF LOOPING ON TEST IS NOT 
(REUUIREO 



(TEST IS SAME AS TEST 1 



(LOOK AT THE PREVIOUS BACK 
(GROUND WORD AND SKIP IF IT 



0017 MOSME 
01 

02 00553 1 450«il 

03 110554 000504 

04 00555 063710 LOOP! 

05 00556 000S63 
0b 00557 B30542 

97 maea BJ4540 

0K 00561 041400 

KB 

llo 00562 175400 

11 610583 156052 

12 190564 000775 

13 00565 004446 
14 

15 00566 030441 
16 
17 

16 110567 173000 
18 U057B 040617 
20 00571 041313 
21 

22 00572 845176 
23 

24 00573 102321 

25 00574 175400 

26 B0575 1064B4 
27 
26 
28 00576 000776 

30 00577 .120603 

31 00600 041166 
32 

33 00601 020602 

34 00602 B41250 
35 

36 00603 1925400 

37 00604 137000 
36 B0605 024424 

38 00606 0546J1 
40 

41 00607 103112 

42 00610 125140 

43 (10611 045201 
44 
46 

46 00612 120000 

47 00613 1354«,1 

48 00614 167000 
48 00615 101404 

50 00616 000776 

51 00617 045204 
52 
53 

54 00620 034501 
55 

56 B0621 055351 
57 

56 00622 055202 ST* 

58 

60 00623 030475 LU* 



MOV 

JMP 

SKPDZ 

JMP 

LD» 

LOA 

ST* 


2.1.3HP 

NXTST-..1 

TTI 

RfcLCT-,,1 

2,TPMEM-.,1 

3,BTMEM-,,i 

0,0.3 


INC 
»bCU« 
JMP 
JSR 


3.3 

2.3.SZC 

.-3-..1 

TSTAB-..I 


LOt 


2,DPNTR-,,1 


»DD 
ST* 
ST* 


3,2 

0,BKP»T-.,1 

«.Y,2 


ST* 


1.2,2 


SUBZL 
INC 

SUB 


0,0, SKP 
3,3 
0,1, SZR 


JnP 
LOA 
ST* 


.-2-., 1 

0,SKREG-,,1 

0.XX.2 


UO* 
ST* 


0,USREG-.,1 
0,W4,2 


LUA 
ADD 
LO* 
STA 


1.0,3 
1,3 

1.N37-..1 
3,T5TAD-.,1 


AUDI.* 
MOVOL 
STA 


0,0, SZC 

1,1 

1,«,2 


COM 
INC 
ALIO 
INC 
JMP 
STA 


1.0 

1,3,SKP 

3,1 

0,0, SZR 

.-2-..1 

1.ZZ.2 


LUA 


3.TPMEM-..1 


STA 


3.VB.2 



3.YY.2 
2.BTMEM- 



MAS -1, 

(AC! ■ TEST TO BE EXECUTED 

(CHECK FOR THE OPR, INPUT 



("RITE THE MEMORY UNDER TEST 
;T0 « B«CK GROUND OF 

(SKIP AFTER REACHIING THE ENO 

(GET THE ADDRESS OF THE TEST 

(TABLE 

(«C2 • DIFFERENCE BETNEEN THE 

(ST»RTING OF THE TEST TABLE AND 

("PNTH" 

(«C2 IS POINTING TO "PNTR" 

(SAVE THE BACK GROUND NORU 

(SAVE THE BACK GROUND WORD AT 

("BKGND", V • BKGNO-PNTR 

(SAVE THE TEST NUMBER AT "TSTNM" 

(2 » TSTNM.PNTR 

(AC0 • 1 

(SKIP IF AC3 IS POINTING TO 
(THE "AOORESS TABLE" *1 OF THE 
(TEST TO BE EXECUTED 

(READ THE SKITCHES 
(STORE THE SWITCHES AT LOC. 
("CP3HR", XX ■ CPSNR.PNTR 
(RE*D THE MEMORY TYPE 
(STORE USER'S OPTIONS AT 
("CPUSR", HMCPUSR-PNTR 



(*C1>37 

(SAVE THE STARTING ADO, OF THE 

(TEST 

(SKIP FOR DG MEMORY CHIPS 

(AC1177 

(h ■ ENDCLM . PNTR 

("ENDCLM" HAS THE ENO OF 

(COLUMN ADDRESS 



1ZZ » ENDBNK -PNTH 

("ENDBNK" HAS THE AODRESS OF THE 

(LAST LOCATION IN THE BANK 

(AC3 • TOP OF THE MEMORY UNDER 

(TEST 

(SAVE AT "TPM1" 

(YB ■ TPMl-PNTR 

(SAVE AC3 AT "STRA3" 

(YY • STRA3-PNTR 



B01B MUSME 

01 00624 021000 

02 00625 103000 

03 00626 002611 
04 

06 00627 000545 DPNTRl PNTR- (TSTAB*1 ) 
06 B0630 000716 DTSTNM1 TSTNM- CNXTST»1) 
JI7 00631 0000J7 N37I 37 

06 B0632 004000 N4000( 400B 
08 

10 B0633 005400 TSTAB! 

11 00634 000013 

12 00635 000045 

13 00636 000064 

14 00637 000100 

15 00640 000130 

16 00541 000153 

17 00642 00W2J1 
16 00643 000410 
IS 00644 000410 

20 00645 000507 

21 00646 177573 



LU* 
MOV 
JMP 



JSR 

TST1-, 

TST2-. 

T5T3-. 

TST4-. 

T8T5-. 

TST6-. 

TST7-. 

TST10-, 

TST11-, 

TST12-, 

BELCT-, 



0,(1,2 

0,1 
#TSTAU-,,1 



0,3 



(AC0 > MEMORY BACK GROUND 
IST*RT THE TEST 



10019 mo: 


iME 










31 
32 
03 
04 

as 

06 00647 


;tst«i 


CHECK 


THE EXTERNAL ADDRESS CIRCUITRY 


165000 


TST1I 


MOV 


3,1 




97 M065B 


176521 




SUBZL 


3.3.SKP 


iacj»i 


«I6 U06S1 


176120 




MOVZL 


3,3 




09 00652 


196432 




SUBO« 


2,3, SIC 


ISKIP IF AC3 IS GREATER OR 


10 










(tOUAL TO AC2 


11 00653 


000776 




JMP 


.-2-..1 




12 1)0694 


054S69 




SI* 


3,TEMP-.,1 




13 00663 


094936 


XADRPt 


STA 


3,TEMP2-,,1 




14 H0656 


1S2S20 




SUBZL 


2,2 


IAC2 • 1 


IS 00617 


136093 




ADCO* 


1,3, ShC 


ISKIP IF AC3 IS NOT GREATER 


16 










ITHAN AC1 


17 BO660 


004660 


NXTSTl 


JSR 


NEXT-,,1 




18 00661 


030960 




LDA 


2,TtMP-.,l 




19 00662 


019400 




OSZ 


0,3 


(LOCATION POINTED Bt ACS ■ -1 


20 0066,1 


021000 


XADK1 


LU» 


0.0.2 


■READ THE LOCATION POINTED 


21 










|BY AC2 


22 00664 


126400 




SUB 


1,1 




23 00666 


172419 




SUB* 


3.2.SNR 


(SKIP IF ACS IS NOT EQUAL 


24 










ITO AC2 


29 00666 


124000 




COM 


1,1 




26 00667 


106414 




SuBtt 


0,1, SZR 




27 08670 


004967 




JSR 


JP1ER-..1 




20 00671 


034922 




LD» 


3,TfcMP2-.,l 




29 00672 


024427 




LDA 


1,TPMEM-.,1 




30 00673 


191120 




MUVZL 


2,2 




31 00674 


132032 




40CU« 


1,2,SZC 


(SKIP IF AC2 IS GREATER THAN AC1 


32 00676 


000766 




JMP 


XADK-,,1 




33 00676 


102400 




SUB 


0,0 




34 00677 


041400 




ST» 


0,0,3 


l»C0"0 


39 00700 


173120 




MUVZL 


3,3 




36 00701 


000794 




JMP 


XADRP-,,1 





0020 MU! 
1 


SHE 










02 




ITST«2 


CHECK • 


FHE EXTERNAL 


DATA CIRCUITRY 


03 

04 












as 












06 00702 


126921 


TST2t 


SUBZL 


1,1, SKP 


MCI"! 


07 00703 


126120 




AOCZL 


1,1 


MCI ■ 177776 


06 00704 


043000 


XUTKt 


ST» 


1,0,2 


MRITE 


09 60703 


021000 




L0» 


0,0,2 


(READ 


10 40706 


106414 




SUB* 


0,1, SZR 




11 00707 


004990 




JSR 


JPlER-,,1 




12 00710 


121100 




MOVL 


1,0 


(MAKE BIT OF AC1 THE CARRY 


13 










IBIT 


14 00711 


123100 




MOVL 


1,1 




13 00712 


123233 




MOVZR* 


1,1, SNR 




16 00713 


000770 




JMP 


XUTR-1-.,! 


(JUMP IF THE 1 HAS BEEN FLOATED 


17 










ITHROUO ALL THE IS DATA BITS 


16 00714 


124234 




COMZR* 


1.1SZR 


ISKIP IF THE » HAS BEEN FLOATED 


19 










ITHR0U6H ALL THE IS DATA BITS 


20 00719 


1000767 




JMP 


XDTR-,,1 




21 00716 


130120 




COMZL 


1,2 


IAC2 • 2 


22 00717 

23 

24 00720 


000741 




JMP 


NXTST-,,1 




000000 


BTMEMI 









29 00721 


000000 


TPMfcMI 










neat muSmE 
01 
a* 

03 



' TST«3 CHECK THE MEMORY FOX DATA HOLDING CAPAB1LTIES 



0b 
5)7 
<nts 
09 
lb 
11 
12 
IS 
14 
15 
16 
17 
lb 
IV 
2? 
?1 



00722 t>2100& T5T3! LOA 

00723 106414 SUB» 

00724 004533 JSR 

00725 151400 INC 
(10726 172052 ADCO» 

00727 glda773 JMP 

00730 030403 LO* 

00731 102000 JPRTl: AUC 



00732 ei0B62Z 

00733 000003 N3: 

00734 M0B004 N4C 
8)0735 U00&05 N5l 
00736 000006 N6I 



JnP 

3 

4 
5 
6 



0,0,2 
0/ 1,SZ« 
JP1ER-..1 
2.2 
3.2.SZC 



.-5-. 

2,N3- 

0,0 



t 



RITlS-,,1 



(READ 
(CHECK 



(SKIP AFTEH READING ALL THE 
(LOCATION 

IAC2 ■ 3 

JPNEPARE TO WRITE A BACK GROUND 

I OF ALL IIS 



0022 HuSME 
«1 










12 
03 


ITST*4 


CHECK 


THE VOLATILITY 


OF MEMORY CELLS 


04 

05 

46 00737 »50454 

37 

Db 


TST4I 


ST» 


2. TEMPS-. ,1 


CTEMP2" HAS THE ADDRESS OF THE 








(LOC. FOR WHICH RKAD.COMPLEMENT- 








»W»ITE CYCLE WILL BE PERFORMEO 


0» 000737 

If 

11 00740 1024091 


Vl,T1i 


TST4 








SUB 


0,8 




12 00741 U41000 




STi 


0,0,2 


(AC0*0 


13 00/42 Plft00P 




OSZ 


0,2 


(LOCATION POINTED BY AC2»-1 


14 U0743 411000 




ISZ 


0,2 


(LOCATION POINTED BY AC2»0 


16 00744 k,0l777 


C1777: 


1777 






16 00745 101404 




INC 


0,8, SZR 




17 0074b 000774 




JMP 


VLT1*3-.,1 


(STAY IN THE LOOP 


18 00747 045000 




STA 


1,0,2 




lb 00750 030750 
20 




LUA 


2,BTMEM..,1 


("BTMEM" IS THE LOWEST LOCATION 








(UNDER TEST 


21 00751 02101)0 


VLT2: 


L0» 


0.0,2 


(READ 


22 00752 106414 




SUB* 


0,1, SZR 


(CHECK 


23 00/53 004504 




JSR 


JPlfcR-.,l 




24 00754 151400 




INC 


2,2 




25 00755 172052 
2b 




«DCO» 


3,2,SZC 


(SKIP AFTER READING ALL THE 








(LOCATIONS 


27 00756 000773 




JMP 


VLTi-,,1 




2b 00757 03U434 




LUA 


2,TtMPg..,l 




28 007E0 020764 




LDA 


0,C1777-.,1 


(AC0»1777 


30 00761 113000 




ADO 


0,2 




31 0076* 06371B 




SKPOZ 


TTI 


(SKIP IF NO TTI KEY HAS BEEN MIT 


32 00763 000403 




JMP 


.♦3 




33 00764 172052 




ADCO* 


3,2,SZC 


(SKIP IF ACS IS BEYOND LIMITS 


34 00765 000752 




JMP 


VLTS-.,l 




35 00766 030746 




LDA 


2,N4-.,L 


(AC2 • 4 


36 B0767 000742 




JMP 


JPRTl-,,1 





0023 MOSME 
01 

42 
33 
04 
03 
06 
07 



(TST«3 



MARCHING ONE'S ANO ZERO'S 



09 
10 
11 
12 
13 
14 
15 
16 
17 
IB 
19 

20 

21 

22 
23 
24 
25 
26 
27 
26 
29 

30 

31 



00770 182521 TST3! 
Pl(»7'71 113001 MRCH1I 

00772 040421 

00773 021000 
KKJ774 122414 
00773 004482 

00776 125004 

00777 011000 

01000 013000 

01001 020412 

01002 172414 

»1003 000766 

01004 124000 

018105 034713 

01006 054575 

01007 100542 

01010 000762 

01011 030724 

01012 0011717 

01013 0(10000 TEMP2S 
001013 OGRh» 



SUBZL 

ADD 

tit 

IDA 

sue* 
jsr 

MOV 
ISZ 

OSZ 

LDA 

sue* 

jnP 

COM 

LDA 
STA 
NtOOL 

JMP 
LDA 
JMP 



TEMP2 



0,0, SUP 
0,2, SUP 
0,TEMP2-.,1 
0,9(2 
1,0, SZR 
JPlER-,,1 
1,1, SZR 
0,2 



0,2 



0,TtMP2- 
3, 2, SZR 



.,1 



MRCMl-,,1 
1,1 

3,BTMEM-,,1 
3,STRA3-.,1 
0,0, SZC 

MRCH1»1-.,1 

2.N5-..1 

JPRT1-.,! 



(AC0»l 

IAC2 • ADDRESS OF THE NEXT CELL 



(SKIP IF THE WORD RtAO IS OK 

(SKIP IP AC1«0 

(MAKE THE LOC. POINTED BY AC2 

IA ZERO AND SKIP 

(MAKE THE LOCATION POINTEO BY AC 

1-1, NEVER SKIP 

(SKIP AFTER CHECKING ALL THE 
(CELLS 



IAC3 • LONEST MEM, UNDER TEST 

(IF ACS MAS 1 THEN MAKE IT -1 
(SKIP IF IT HAS ALREADY -I 

IAC2 • 5 




01 

02 
13 
04 
»5 
06 
i)7 
09 
0b 
10 
11 
12 
13 
14 
15 
16 
17 
lb 
19 
2D 
21 
22 
23 
24 
25 
2b 
27 
26 
29 
30 
31 
32 
33 
34 
35 
36 
37 
36 
39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
31 
52 
53 
54 
56 
56 
57 
5b 
59 

«0 



024 MUSMF 



(T5T*6 



SMU'TINU UIAGUNAL TEST 



01014 U40425 TST6I 
01013 020565 DGNOL: 

01016 100000 

01017 048570 

01020 050564 



01021 030565 

01022 102120 

01023 040770 

01024 030560 

01025 034561 



01026 024413 DORITl 

01027 156415 



01030 124000 

01031 020762 



01032 101404 

01033 045000 

01034 021000 

01035 054546 

01036 122414 

01037 004420 

01040 151401 

01041 000000 TEMPI 

01042 020543 

01043 024636 

01044 143414 
01043 132053 
01046 00B412 



01047 020333 

01050 172014 

01051 000755 

01052 143414 

01053 153401 

01054 175401 

01055 117000 



STA 
LUA 
COM 
ST» 

STA 



STA 

ADCZL 

STA 

LOA 
LD* 



LDA 
SUB* 



COM 
LDA 



INC 

SI A 

LDA 

STA 

SUB* 

JSR 

INC 



LOA 

LOA 

ANO* 

ADCO* 

JMP 



LDA 
ADC* 

JMP 

AND* 

INC 

INC 

ADD 



0,TENP-,,1 

0,ENDCLM-,,1 

0,0 

0, TEMPI-,, I 

2,DGBOT-,,l 



2,DSB6N-.,1 

0,0 

0,DGRH-,,1 

2,DSB0T-,,1 

3,DGBGN-,,l 



1, TEMP-., I 
2,3,SNR 



111 

0,DGRB-, p 1 



0,0, SZR 

1,0,2 

0,8,2 

3,STRA3-.,l 
1,0, SZR 
JP1ER-.,1 
2,2,SKP 

0,ENDBNK-.,1 
l,TPMtM-.,l 
2,0, SZR 
1,2,SNC 

DGCHK-,,1 



0,ENDCLM-, 
3, 2, SZR 

DGRIT-,,1 
2,0, SZR 
2,3,SKP 
3,3,SKP 
0,3 



(THIS TEST IS DESIGNED TO CHECK- 
(OUT THE MEMORY BY HRITING A 
f DIAGONAL OF I'S IN A FIELD OF 
(0'S ANO A DIAGONAL OF f'S IN A 
IFIELU OF I'S IN EACH BANK ANO 
(THEN READING FOR CORRECT DATA. 
(THE OIAGONAL IS SHIFTED THROUGH 
(EACH ROM OF THE BANK 
I'TtMP" HAS THE BACKGROUND DATA 



I "TEMPI" HAS THE NUMBER OF TIMES 
(THE OIAGONAL MILL BE SHIFTED 
("OGBOT" MAS THE LDHEST ADDRESS 
UN THE BANK UNOER TEST 



(ACQ • 177776 

(STORE A 177778 AT "DGRM" 

("DGBGN" HAS THE ADDRESS OF 

I THE LOCATON WHERE THE DIAGONAL 

MILL START 

(SKIP IF IT HAS NOT A DIAGONAL 
(LOCATION 



("OKRN" HILL BE -2 IF THE DIAGO- 
NAL IS BEING WRITTEN AND »1 IF 
(IT IS ONLY BEING READ 

(HRITE 
(READ 



(CHECK 



(JUMP IF THE END OF THE BANK 
(OR TOP OF THE MEMORY HAS 
(BEEN REACHED 

(SKIP IF THE LOCATION REAO/ 
(HRITTEN HAS IN THE DIAGONAL 

(SKIP IF IT HAS END OF COLUMN 
IAC3 HAS THE ADDRESS OF THE 



0*2 
Bl 

f>2 

as 

VIA In 

n& 

96 
117 B 
BB 
IS u 

11 k< 

12 

13 

U 

15 

16 

17 



1066 0*4758 



106b 010733 

1061 fc*a7A3 

106* 010524 

1063 «fii7lB 

11364 n ci a « i» 5 

1063 wlf)522 

1066 0*0734 

1067 132452 



JMP 



1»97 0*0571 JPItRl JMP 



ISZ 

JMP 

ISZ 

SKPOZ 

JnP 

ISZ 
JMP 



OGRIT-, 

JP2ER-, 

OGRK-. i 

0GR1T-2 

DuBCiN-. 

TT1 

EN06-1- 

T6MP1-. 

DliRIT-4 



SUBOB 1.2.SZC 



1U7B 0B0725 JMP DGNOL- 

1071 030645 LUA 2.N6-, 

1072 0*0637 ENOo: JMP JPRT1-,, 



(NEXT LOCATION IN THE COLUMN 



(OTHERWISE READ THE MEMORY 



(REPEAT NITM THE SH;[FTEO UIAG, 
(SKIP U THE END OF MEMORY 
(HAS BEEN REACHED 

IAC2 • 6 



e*26 MU 
01 
l't 

At 

lit 

06 01073 

*7 

06 
19 
in 
11 



Srtfc 



ITST»7 



CMECK THE hORST CASE ADDRESS AND DATA TRANSITIONS 



05*557 TST7! 



111074 05H51K R1TGLP! 



B2051" 

l*4i>0n 

13340S! 

1B5620 

044505 

147*0* 
14300* 
040735 
162*53 
161000 
04050* 
034542 
13B4S2 



01112 122*52 



01075 
0107b 

12 «I1077 

13 

14 41100 

15 011*1 
16 

17 Ml 1*2 

18 011*3 

19 011*4 

20 uiirs 

21 01106 

22 01127 

23 01110 

24 mini 
25 

2b 
27 
2b 
29 

30 01113 

31 01114 

32 01113 

33 01116 
34 

3!) 

36 01T17 

37 til 120 
*B 01121 

39 0U22 

40 01123 
41 

42 01124 

43 0112b 
44 

49 0112b 
46 1127 
47 

4e 

49 

S0 

51 01131 

32 

53 01 132 

54 

5b 

56 01133 

57 01134 
56 

39 01136 
SB 



0*0453 
135000 
024S77 

124*0* 



04340B 
17640B 
116*62 
UB0775 
134528 

054456 
125404 

0*0475 
fei?4445 RURClI 



M 130 0*44bW 

0M443 
012707 



060077 

0*4462 



ST* 


2,eTMi-.,i 


SI* 


2,C'tt<IOT-.,l 


LD1 


B,ENObNK-., 


COM 


*.l 


ANO 


1,2 


INCZR 


e.i 


ST* 


1,DGBGN-.,1 


»OD 


2.1 


4U0 


2»<! 


STA 


B,TEMP-.,1 


»DCU» 


3.8.SNC 


MOV 


3,^ 


STA 


Id, TEMPI-, ,1 


LOA 


3,BTM1-.,1 


SU80« 


1,3,SZC 



»DCO« l.B.SZC 



JMP 
MOV 
LDA 
COM 



STA 

INC 

AOCOtt 

JMP 

NEGZL 

STA 
INC 

JrtP 
JSR 



JSR 
ISZ 



NIO 
JSR 



NXTBNK 

1.3 

1 ,BHGNt)-.,l 

1.1 



1.8.3 

3,3 

B.3.SZC 

.-3 

1,3 

3.EN0CLM-..1 
1,1, SZR 

R0RC2-..1 
R0RC3-..1 

R0HC4-.,1 



RURC3-..1 
•1EMP-., 1 



CPU 
R0RC5-..1 



("BTM1" MAS THE ADDRESS OF THE 
(LOWEST LOC. TO BE TESTED 
("DGBOT" HAS THE LOWEST LOCATION 
(OF THE MEMORY BANK ONOER TEST 
(ACfl»END OF A BANK OF MEM 

(AC2«L0WE5T LOCATION IN 
(A MEMORY BANK 

("DGBGN" MAS HALF THE NUMBER OF 
(CELLS IN ONE MEMORY BANK 



("TEMP" HAS TOP OK THE BANK 
(AC31T0P OF THE MEMORY UNDER 
(TEST 



(SKIP IF THE LONEST LOCATION TO 
(BE TESTED IN THE SANK IS 
(HIGHER THAN THE MIDDLE OF BANK 
(SKIP IF THE HIGHEST LOCATION TO 
(BE TESTED IS HIGHER THAN THE 
(MIDDLE OF THE BA^K 
(OTHERWISE TRY THIS NEXT BANK 



(UPPER HALF OF THIi: MEMORY WILL 
(BE WRITTEN TO COMPLEMENTED 
(BACKGROUND 



(SKIP AFTER REACHING THE END 

(AC3 • 2 IF UPPER HALF OF MEM. 
(IS WRITTEN TO M * 1 IF IT IS I 
(SAVE IT 

(SKIP IF THE UPPER HALF OF THE 
(MEMORY HAS BEEN WRITTEN TO -1 



(SUBROUT 
♦ HERE 
(STAY IN 
(OF THE 
(OR "RDR 
(SUBROUT 
(HERE 
(INCREME 
(CONTROL 
(THE CO« 
(NO-OP 
(STAY IN 
(ION IN 
(SUBROUT 
(HERE 



INE "RDRC't" WILL RETURN 

THE LOOP UNTIL EITHER 
TWO CONOMIONS IN "RDRC3 
C4" ARE MET 
INE "RORCS" WILL RETURN 

NT AND SKIP 

L WILL COME HERE AFTER 

DITIQN IN R0RC4 IS MET 

IME LOOP UNTIL CONDIT- 
"RORC3" IS MET 
INE "RORC'I" WILL RETURN 



0027 MUS 
01 if 1 136 
192 
83 811137 

04 
05 
06 01140 

a? 

0» 01141 

09 HI 142 

lt< 01143 

11 H1144 

12 14114!) 

13 01146 

14 01147 

is 0113m 

16 olisi 

17 01132 
ID 

IB 01153 

20 B1154 

21 01155 

22 B1156 

23 21137 

24 011614 
2!> 191161 

26 01162 

27 01163 
26 01164 
26 

3D 01165 

31 01166 

32 01167 

33 (11170 
34 

35 01171 

36 01172 

37 01173 
36 

36 01174 

40 

41 

42 

43 01175 

44 01176 
45 

46 01177 

47 01200 
46 

45 01201 

30 01202 

31 01203 

32 81204 
53 01205 

34 01206 
55 01207 
5b 

57 01210 

56 

56 

90 



0044S2 



015000 



034701 
126401 

01S0O0 
011400 
060077 
131400 
136000 
014437 
O0O772 
155000 
030432 

021000 
024540 
172452 
124000 
054424 
1*6414 
004467 
151400 
020424 
112052 

000766 
111400 
034563 
172452 

000703 
030407 
000677 

024456 



RDRCH: 



END7! 
RJRC3: 



132453 
001405 

025000 
001400 

000007 
00O0OP 

oooooo 

000000 
000000 
000000 
000000 



N7: 

ENDCLhI 

STR»3l 

DGBOTs 

ENDBNKI 

DGBGNI 

TEMPI! 



JSR 
OSZ 

LOA 

SUB 
OSZ 
ISZ 
NID 
INC 
iuC 
DSZ 

JHP 

iuv 
LU» 

LCA 

LUA 

SUBUH 

COM 

3T» 

SUBH 

JSR 

INC 

LDA 

«0C0« 

JhP 
INC 

LUA 
SUBUH 

JhP 
LUA 
JhP 



SUBUH 
JhP 

LUA 
JhP 

7 






RURC4-..1 
0,2 

3, TEMP-., J 

1,1, SKP 
0,2 

0,3 

CPU 

2,2 

1,3 

DG8GN-.,! 

.-6-..1 

2,3 

2,0GB0T-.,1 

0,0,2 

1 ,BKGNO-., 1 

3,2,SZC 

1,1 

3,STRA3-.,1 

0,1, SZR 

JP2ER-.,1 

2,2 

0, TEMPI-. ,1 

0,2,SZC 

RP«CH»2-.,1 
0,2 

3,TPM1-.,1 
3,2,SZC 

RITGLP-..1 
2,N7-.,1 

END6-..J 

l,9Thl-.,l 



1.2.SNC 
5,3 



1,0,2 
0,3 



(STAY IN LOOP UNTIL CONDITION 
UN "R0RC4" 18 MET 
(CONTROL HILL COME HERE IF 
(CONDITION IN "R0KC3" IS MET 
IBHEN CALLEO AT R0RC1»1 
(CONTROL HILL COME MERE AFTER 
(THE CONDITION IN RDRC4 IS MET 

(LOCATION POINTED BY AC2>>1 
(INCREMENT AND SKIP 



(SKIP AFTER REACHING THE MIDDLE 

(AC3«HI0DLE OF THE BANK 
(AC2«L0«EST LOCATION OF THE 
(MEMORY BANK 
(READ 



(CHECK 



(SKIP AFTER CHECKING ALL THE 
(CELLS 



(SKIP AFTER REACHING TOP OF THE 
(MEMORY UNDER TEST 

(AC2 » 7 



(CONDITION TO BE MET IS: 
(AC2 SHOULD BE GREATER THAN OR 
(EQUAL TO THE LOWEST LOCATION 
(UNDER TEST 

(IF THE CONDITION IS MET THEN 

(RETURN TO CALLING LOCATION *5. 

(READ 

(AND RETURN 



024631 RURC4I LOA 



1, TEMP-., I 



(CONDITION TO BE MET IS! 
(TEMP SHOULD BE LESS THAN OR 
(EQUAL TO THE HIGHEST LOCATION 
(UNOER TEST 



36 



002 
«l 

02 

03 u 
3 4 
05 
H6 
07 

3 

"y o 
id o 
11 

12 o 
13 

14 
16 

16 
17 

16 
IB 

20 
21 
22 

23 
24 

25 
26 
27 » 

26 
26 
30 
31 
32 

33 

34 
35 

36 

37 
36 
3B 



8 MUSHE 

1211 122453 

1212 U05401 LUAU5: 

1213 026628 

1214 024766 

1215 137000 

1216 151400 RURC5! 

1217 014622 

1220 014766 

1221 001774 

1222 000727 

1223 004751 RURC2: 

1224 060077 

1225 004763 



122b 004746 

1227 016612 

1230 004764 

1231 011000 

1232 O6O077 

1233 004755 

01234 011000 



40 

41 

42 

43 

44 
45 
46 

47 
46 



1235 060077 

1236 034603 

1237 126401 

1240 011000 

1241 060077 

1242 015400 

1243 151400 

1244 136000 
1243 014741 

1246 00O772 

1247 000702 



SUBO« 
JSR 

LDA 
LUA 
ADD 
INC 
OSZ 
OSZ 
JhP 
JhP 

JSR 

NIO 
JSR 



JSR 
DSZ 

JSR 

ISZ 

NIO 
JSR 



1,0, SNC 

1,3 

1,»TEMP-.,1 

1,EN0CLM-,,1 

1,3 

2,2 

TEMP-,,1 

DGBGN- 

-4,3 

RDRCH-., 1 

R0RC3-., 

CPU 
R0RC4-,, 



R0RC3-., 
♦TEMP-., 

RDRCS-2-,,1 

0,2 

CPU 
RDRC4-.,1 



0,2 



1250 000503 JP2ER1 

1251 000000 cpusr: 

1252 OOO000 BTMi: 



NIO 


CPU 


LDA 


3, TEMP-. ,1 


SUB 


1,1, SKP 


ISZ 


0,2 


NID 


CPU 


OSZ 


0,3 


INC 


2,2 


ADC 


1,3 


OSZ 


0GBGN-.,1 


JhP 


.-«-., 1 


JhP 


RDRCH-. ,1 


JhP 


JP3ER-..1 













(READ 

(ADO 1 OR 2 

(DECREMENT 

(SKIP AFTER REACHING THE MIDOLE 

(OTHENNISE STAY IN THE LOOP 



(SUBROUTINE "RDRC4" MILL RETURN 

(HERE 

(NO-OP 

(STAY IN THE LOOP UNTIL EITHER 

(OF THE THO CONDITIONS IN "RDRC3 

(OR "R0RC4" ARE MET 

(SUBROUTINE "RDRC5" HILL RETURN 

(HERE 

(DECREMENT 

(CONTROLL HILL COME HERE AFTER 

(THE CONDITION IN R0RC4 IS MET 

(STAY IN THE LOOP UNTIL CONDIT- 

(ION IN "RDRC3" IS MET 

(SUBROUTINE •RDRC4" HILL RETURN 

(HERE 

(STAY IN LOOP UNTIL CONDITION 
(IN "RDRC4" IS NET 
(CONTROL HILL COME HERE IF 
(CONDITION IN "R0RC3" IS MET 
(HHEN CALLED AT R0RC1»1 

(CONTROL HILL COME HERE AFTER 
(THE CONDITION IN RDRC4 IS MET 

(LOCATION POINTED BY AC2'0 

(NO-OP 

(DECREMENT 



(SKIP AFTER REACHING THE MIDOLE 



(COPY OF USER'S REG. 



0029 
81 



MUSME 



(TST« 
I.... 



02 

03 

04 

US 

06 01253 102001 TSTlHi »[)C 

07 

08 

Ok 

If HI 
11 

IS 

13 HI 

14 01 
19 ml 
16 



IB ROW/COLUMN AND LONG GALLOPING TEST 



254 102400 TSTu: SUB 



2bb 040731 

256 034724 GALP11 

257 054725 

2661 024771 

261 127100 

262 101004 



17 01 

lb Hi 

10 HI 

20 

21 X1263 127102 

22 



23 til 

24 HI 

as tn 

26 ft 
27 

26 ill 
29 

ID «1 
11 



264 034721 

265 164000 

266 147400 

267 137000 

270 024462 

271 1360S3 



32 
33 til 



272 135000 

273 2150714 



'4 ml 

45 Hi 

46 01 

47 01 

48 HI 

49 ill 
5ks 

51 01 
32 1 
53 
54 01 

5b ai 

56 01 

57 01 
58 

59 01 

60 01 



300 030707 

301 020463 GALH3: 

302 142405 

303 000410 

304 021000 

305 020457 

306 054675 
30/ 125414 

310 101415 

311 107414 

312 004560 

313 151401 

314 000000 BKfcNOI 

315 020671 

316 024664 

317 101005 



STA 
LuA 
STA 

LUA 

Al/DL 

MUV 

ADOL 

LDA 
COM 
AND 
AuO 

LDA 

AOCU* 

MUV 
STA 



34 

35 

36 01274 050470 GALP2: STA 

37 

36 01275 024417 

38 01276 124000 

40 01277 045000 

41 

42 01 

43 01 



LDA 
CUM 
SI A 

LUA 
LOA 
SuR 
JHP 
LDA 
LUA 
STA 
INC» 

INC» 

ANOfr 

JSR 

INC 



Lu» 

LDA 
MUV 



B,B,SKP 



0,DGBGN-.,1 

3,ENDCLM-,,1 
3,PGB0T-.,1 

1,CPUSR-. , 1 
111 

0,0, S^R 

1,1, szc 

3,ENDBNK-,,1 

3,1 

2,1 

1,3 

1,TPM1-.,1 

1,3,SNC 

1,3 

2, TEMPI-. ,1 



2,TfcMP3-.,l 

l.BKGND-,,1 

1,1 

1,0,2 

2, TEMPI-, ,1 
B,TEMP3-.,1 
2,0,SNH 
•♦8.-..1 

e.8,2 

1,#TEMP3-.,1 
3,STRA3-.,1 
1,1, S/H 

0,0, SNR 
0,1, SZH 

EKR2-.,1 
2,2,SKP 

P,DGBGN-.,1 

1,ENDCLM-,,1 
0,0, SNR 



(ENTER TO PERFORM GALLOPING TEST 

PON SEQUENTIAL MEMORY CELLS 

MITH A BOUNDRV OF ONE BANK 

(OR OF ONE ROM/COLUMN 

(ENTER TO PERFORM GALLOPING TEST 

ION CELLS 32 OR 64 LOCATIONS 

(APART 

IAC3«END OF COLUM/RUH AOO. 
("DGBOT"«NUMBER OF MOMS ON THE 
(MEMORY CHIP 
(READ USER'S OPTION!, 

(SKIP IF GALLOPING ON SEQUENTIAL 
(CELLS IS NOT BEING PERFORMED 
(SKIP IF ONLY RON/COLUMN GALLOP- 
IING TEST HAS BEEN SELECTED 
!AC3'AD0RESS OF END OF HANK 



IAC3«A0DRES5 OF THE LAST 

(LOCATION FOR GALLOP PURPOSES 

(AC1»T0P OF THE MEMORY UNDER 

(TEST 

(SKIP IF AC3 IS LESS OR EUUAL TO 

(AC! 

("TEMPI" IS THE LOREST LOCATION 

(FOR HMICH GALLOPING HILL BE 

(PERFORMED 

("TEMPS" IS THE LOCATION UNDER 

(GALLOP TEST 



(*RlTt COMPLEMENTED OATA AT THE 
(LOC. FOR WHICH GALLOPING HILL 



(READ A LOCATON 

(READ THE GALLOP LOCATION 

(ONE OF THE TWO LOCATIONS SHOULD 
(HAVE -1 

(MAKE SURE THAT THEY ARE 
(COMPLEMENT OF EACH CITHER 



("DGBGN" IS -1 FOR SEQUENTIAL 
(GALLOPING AND OTHERWISE 

(SKIP IF IT IS NOT RDN/COLUMN 



0030 MUSME 
*1 
02 
03 



05 

06 

07 

06 

09 

10 

11 

12 

13 

14 

16 

16 

17 

18 

19 

20 

31 

22 

23 

24 

2b 

26 

27 

28 

S» 

30 

31 

32 

ii 

34 

3b 

36 



01320 133000 

01321 172052 

01322 000757 



01323 030771 GALP41 

01324 052440 

01325 06371B 

01326 000421 

01327 010435 

01330 030434 

01331 101005 

01332 133000 

01333 172052 

01334 (■00740 

01335 101004 

01336 000406 

01337 030650 

01340 151400 

01341 014643 

01342 00073t 

01343 171400 

01344 034406 

01345 172052 

01346 000710 



01347 030522 ENDGLPI 
01350 113000 



01351 000622 

01352 000000 TPMj: 

01353 000554 JP3ER! 



ADD 


1,2 


ADCCj* 


3,2, SZC 


JMP 


GAI.P3-.,! 


LDA 


2,BKGN0-.,1 


STA 


2,0TEMP3-.,1 


SKPUZ 


m 


JMP 


F.NDttLP-,,1 


IS2 


TfcMP3-„,l 


LUA 


2,TtMP3-.,l 


MOV 


0,0, SNR 


ADR 


1,8 


AUCO» 


3,2,S2C 


JMP 


GALP2-..1 


MOV 


0,0, SZR 


JMP 


.♦6-., 1 


LDA 


2,TEMPI-,,1 


INC 


2,2 


DS2 


OGBOT-,,1 


JMP 


GALP2-1-..1 


INC 


3,2 


LOA 


3,TPMJ-.,1 


ADCO* 


3,2,SZC 


JMP 


GALP1-.,1 


LDA 


2.TU-..1 


ADO 


B,2 


JMP 


END/-.,! 







JMP 


ENR1.-..1 



(GALLOPING 

(SKIP AFTER REACHING THE END 



(RESTORE THE LOCATION 
(CHECK FDR A TTY KEY 



(SKIP AFTER REACHING THE END 

(CHECK FOR THE TYPE OF GALLOPING 
(TEST 



(REPEAT RON/COLUMN GALLOPING 
(AC2 • STARTING ADDRESS OF THE 
(NEAT BANK/QUADRANT 

(SKIP AFTER REACHING THE END 

(IF GALLOPING IS NOT OVER THEN 

(REPEAT THE TEST [AC2«NEXT 

(LOWEST LOCATON FOR GALLOPING) 

(AC2 • 11 

(AC0 • I) FOR TEST 11 AND -J 

(FOR TEST 10 

(OTHERWISE WRITE A BACKGROUND 

(OF ALL l'S 



0031 MUSME 

«ll 

02 
33 
04 
05 

06 01354 126001 TST12I 

07 01355 030675 CNTRCl 



(TST*12 
(•»»••» 



BEAD MEMORY THRU INDIRECT ADDRESSING 



as 
to 
11 
12 
13 
14 
IS 
lb 
17 

te 

19 

2a 

21 
22 

23 
24 

25 
26 
27 
28 
2B 
30 
31 
32 
33 
34 
3S 
36 
37 
36 
39 
421 
41 
42 
43 
44 
4S 
46 
47 
48 
49 
50 
SI 
32 
53 
54 
35 
56 
57 
56 
99 

eo 



01356 044406 

01357 o2o324 
01360 112452 

01351 111000 

01352 050670 
H1363 004627 NXTCL! 

01364 ooaooe TEMPS: 
001364 DIREC" 

01365 051774 



01366 020423 

01367 040917 

01370 125112 

01371 116000 

01372 020610 

01373 151400 

01374 051778 

01375 137000 

01376 113000 

01377 051770 

01400 137000 

01401 112000 PNTRI 

01402 130400 

01403 190000 
01474 091770 

01405 137000 

01406 112400 

01407 051770 

01410 0*14602 

01411 177774 M4I 

01412 126000 

01413 031770 SETUP! 

01414 175400 

01415 020739 
B1416 142443 
01417 020633 

01420 112452 

01421 000405 

01422 0S0463 



01423 193240 

01424 125405 



AUC 
LOA 

STA 
LDA 
SUBO« 

MOV 
STA 



TEMP3 

STA 



LDA 
STA 

MQVL* 

AUC 

LDA 

INC 

STA 

ADD 
ADD 
STA 
ADD 

ADC 

NEE 
COM 
STA 

ADO 
SUS 
STA 

JSR 

-4 
AOC 

LDA 

INC 

LDA 

SUBU 

LOA 

SUBOM 

JMP 

STA 

AODOR 
INC 



1,1, SKP 
2,BTMl 

1,DIREC 
0,N40 
0,2, SZC 

0,2 

2,BTM1 

LOADS 



2, DA, 3 



0,M4 

0, COUNT 

1,1, SZC 

0,3 

0,ENDCLM 

2,2 

2,DB,3 

1,3 
0,2 

2,08,3 

1,3 

0,2 

2,2 

2,2 

2, OB, 3 

1,3 

a, 2 

2,06,3 

LOADS 



1,1 

2,DB,3 

3,3 

0,TPM1 
2,0, SMC 
0,BTMI 
0,2, SZC 
UPDAT 
2, LAST 

2,2 

1,1, SNR 



jaci « »i 

(AGAIN START FROM THE LUHEST 

(MEM. LOCATION 

(CLOCKMISE/ANTI-CLOCKMISE 

(ACB • 40 

(DON'T TEST AUTO-INC. AND AUTO-D 

(LOCATIONS 



(LOAD AC3 WITH THE ADDRESS 
(OF "L0AD5*!", I RETURN ,*2 
(NEVER RETURN HERE 

(STORE THE ADDRESS OF THE LOC, 

(UNDER TEST AT TEMPI. 

(DA » TEMP1-(L0A05*1) 

(AC2 • ADDRESS OF CELL UNOER TES 

(ACO • -4 

(SKIP IF MOVING CLOCKMISE 

IAC8 ■ CELLS IN ONE COLUMN 

(SET UP THE FIRST LOCATION 
(OB • 3TRA3»(L0A05*1) 
(INC. /DEC, 

(SET UP THE NEXT LOCATION 
(INCREMENT/OECREMENT 



(DECREMENT AC2 

(SET UP THE ADDRESS OF THE NEXT 

(LOCATION 

(INCREMENT/DECREMENT 

(STORE THE ADDRESS OF THE NEXT 

(LOCATION 

(LOAD AC3 MITH THE ADORESS OF 

(L0A05 ♦ 1, RETURN ,*2 

(NEVER RETURN HERE 

(AC2 • ADORESS OF LOC, WHICH NIL 
(BE LOAOED 

(MAKE SURE THAT ADORESS IN ACS 
(IS NITMIN THE MEM. BOUNDRIES 

(SKIP IF O.K. 

("LAST" IS LAST LOCATION WITHIN 

(THE MEM, BOUNDRIES 

(SET BIT OF AC2 

(SKIP IF BEGINING OF INDIRECT LO 

(HAS ALREADY BEEN SETUP 



01 
01 


132 "US 
01425 


irtE 
05«J457 


STA 


2,INBSN 


012 


01426 


031770 UPDATI 


LOA 


2, OB, 3 


03 


01427 


141100 


MDVL 


2,9 


34 


01430 


010456 


I5Z 


COUNT 


05 


01431 


111240 


MOVOR 


0,2 


06 


01432 


125414 


INC* 


1,1, SZR 


41 

06 


01433 


052452 


STA 


2.PLAST 


39 


£1434 


151112 


MOVL« 


2, 2, SZC 


10 


01435 


000756 


JMP 


SETUP 


11 


01436 


034445 


LUA 


3,N40 


12 


01437 


094447 


STA 


3, COUNT 


13 


01440 


024654 


LDA 


1,BKGND 


14 


01441 


124000 


COM 


1,1 


16 


01442 


045000 


STA 


1,0,2 


16 


01443 


022441 


LDA 


O.PINBGN 


17 


01444 


106414 


SUB* 


0,1, SZR 


16 


01445 


004462 


JSR 


ERR1 


19 


01446 


01444* 


OSZ 


COUNT 


20 


01447 


000774 


JMP 


.-4 


21 


B1450 


124000 


COM 


1,1 


22 










23 


01451 


020433 


LDA 


0.IN8GN 


24 


01452 


115000 


MOV 


0,3 


26 










26 


01453 


021400 


LDA 


0,0,3 


27 


01454 


045400 


STA 


1,0,3 


2B 


01455 


1724J4 


SUBU 


3, 2, SZR 


29 










30 


01456 


000774 


JMP 


.-4 


31 


01457 


151400 


INC 


2,2 


32 


01460 


024704 


LDA 


l.DIREC 


33 


01461 


034671 


LOA 


3.TPM1 


34 

35 
36 


01462 


156453 


SUBU* 


2,3,SNC 


01463 


000700 


JMP 


NXTCL 


37 


01464 


063610 


SKPDN 


TTI 


38 


01466 


124142 


COMOL 


1,1. SZC 


39 


01466 


102521 


SUBZL 


0,0, SKP 


Alt 


01467 


0(0666 


JMP 


CNTRC 


41 
42 
43 


01470 


000657 


■ JMP 


ENDGLP 


01471 


000011 Til ! 


11 





IAC2 » NEXT ADDRESS IN THE LOOP 

(COUNT MAS SET UP TO -4 

(FOR FIRST 4 CELLS SET BIT » 

(SKIP IF LOC. "LAST" MAS NOT BEE 

(INITIALIZED 

(STORE AT LAST GOOD LOCATION 

(SKIP IF INDIRECT LOOP IS OVER 

(ACS • 40 

(PREPARE TO LOOP 40 TIMES 
(AC1 • MEM. BACK GROUND PAT. 

(KRITE THE LOCATION UNDER TEST 
(READ THE LOC. UNOER TEST 
(SKIP IF O.K. 

(SKIP AFTER LOOPING IB, TIMES 

(BACK TO ORIGINAL BACK GROUND 
(WORD 

(ACS • ADDRESS NHERE THE LOOP 

(BEGAN 

(SET THE NEXT LOC, OF THE LOOP 

(RESTORE THE MEM. LOC. 

(SKIP AFTER RESTORING THE LOC, 

(UNOER TEST 



(ACS • CIRCULAR DIRECTION 

(ACS p TOP OF THE HEM, 

(SKIP IF ALL THE LOC. NAVE 

(BEEN TESTED 

(REPEAT KITH THE NEXT HEM, CELL 

(SKIP IF A TTI KEY IS HIT 

(MOVE CLOCKWISE AND ANTI-CLOCKNI 

(AC0 • 1 



to 

01 

02 
03 
no 
us 
■Sb 
a? 
«e 
?w 
m 
ll 
la 

13 

14 

IS 
16 
17 
IB 
1» 
20 
21 
22 
23 
24 
25 
26 
27 
2« 
29 



033 MQSME 



01475 004433 

01476 124**0 

01477 020405 
OISCO 03O664 

01501 034477 

01502 19*0427 

Biisui noao40 mo: 

01504 OOOBOO STRAl: 

01505 oOOOOf* STRA2: 

01506 OO000O RTMESl 



(•ERROR ROUTINE 



I^?„ S i BR0UTINE IS HAULED UPON SEEING AN ERROR. THE 
SUBROUTINE IS DESIGNED TO REPORT TEST NUMUER. LOC 
♦1 WHERE THE ERROR HAS DETECTED, CONTENTS OF AC2 ' 
AS THE FAILING LOCATION, ACl AS THE EXPECTED DATA 
AND ACB AS THE DATA FOUND. 
ERROR MESSAGE UNIT REPORTED IF ERROR PRINT-OUTS HAVE 

REPORTED "cT "" " ™ E F4UINS " T M * 5 * L " E * DY «" 



01472 0S45O6 EKR2I ST» 



01473 044411 

01474 024620 



STA 
IDA 

JSR 
C0« 
LDA 
LDA 

LDA 

JMP 



3,ERLDC-,,1 

l,STRAl-.,l 
1,BKGND-.,1 

ERRltl-,,1 
1,1 

B,STRA1-,,1 
2,TfcMP3-.,l 



3,EKL0C- 
EKR1+2-. 



.1 



/LOCATION WHERE THE ERROR MAS 

(UETECTEO 

(SAVE ACl 

("BKGND" HAS THE BACKGROUND 

IPATTERN WRITTEN IN THE MEMORY 

(ACl'PATTERN AND 

(AC2«A0DRESS OF THE GALLOP 
(LOCATION 



10034 MOSHE 








HI 

02 


(•ERROR ROUTINE 


CON 


03 015P7 136400 L0Au4i 


' SUB 


1,3 




04 01510 025400 


LOA 


1,0,3 




OS 01511 (120467 


LDA 


0,ERLOC- 


• , 1 


06 616)2 125004 


MOV 


1,1, SZR 




"7 01S13 O0176B 


JMP 


AA,3 




08 01514 WJ0600 


LDA 


0,BKGNO- 


• ,1 


0H 0151b 024462 


LOA 


1,TSTNM- 


.#1 


10 01516 153103 


ADDL 


2,2,SNC 




ll oisi7 ooisea 


JMP 


AH, 3 




12 0162a 030512 


LDA 


2,DSTKAo 


-•!'■ 


13 01521 157000 


ADD 


2,3 




14 01522 020452 


LDA 


O,SAV0-. 


, 1 


15 01523 024452 


LDA 


I.SAV1-. 


, 1 


lb 01524 030507 


LDA 


2.ERSV2- 


.,1 


17 01525 035400 


LDA 


3,0,3 




16 01526 002507 
19 


JMP 


ORTERR-., 


.1 


20 01527 054461 ERRH 


STA 


3.ENL0C- 


.,1 


21 01530 050503 


STA 


2.EKSV2-, 


■ >1 


22 01531 050445 


STA 


?, JAV2-., 


,1 


23 01532 044443 


STA 


1,SAV1-., 


, 1 


24 01533 040441 


STA 


B,SAV»-., 


,1 


25 01534 054501 


STA 


3,RTERR-, 


.,1 


26 01535 135000 


MOV 


1,3 


27 01536 117520 


ANOZL 


0,3 




26 01537 107000 


ADO 


0, 1 




2* 01540 166400 


SUP 


3,1 




30 








31 01541 034440 


LOA 


3,M377-., 
3,2 


1 


32 01542 173700 


ANOS 




33 01543 151220 


MOVZR 


2,2 




34 01544 150240 


COMOR 


2,2 




35 01545 020467 


LOA 


0.N16,-., 


1 


36 01S46 004575 
37 


JSR 


HSTRY-..1 




36 








SB 01547 117000 


ADO 


0,3 




40 11560 151404 


INC 


2,2,32R 




41 01551 000776 


JMP 


•-2-..1 

1,1, SNC 




42 P15S2 125123 EWRA: 


MOVZL 




43 01553 000407 


JMP 


ERRB-,,1 




44 01554 0U400 


IS2 


0,3 




45 








46 01555 031400 


LUA 


2,0,3 




47 01556 151112 


MDVL» 


2, 2, SIC 




46 01557 015400 


1>5Z 


0,3 




49 








50 0156,, 151225 

51 

52 01561 102000 


MOVZK 


2.2.SNR 




ADC 


0,0 




53 








54 tl662 175400 ERRb: 


INC 


3,3 




15 01563 125004 


MOV 


1,1, SZ« 




56 








57 








56 01564 000766 


JMP 


ErtRA-,,1 




Si 01565 034402 

60 


LDA 


3,Ct-Si.k- #1 


.1 



(AC3 • EGGS 

(ACl • CONTENTS OF EGGS 

(ACB • ERROR PC 

(SKIP IF NOT UNDER OTOS 

(GO TO "RTRN*1" 

(ACl ■ TEST THAT FAILED 
(SKIP IF NOT LOOPING ON ERROR 
(GO TO "LOOP", AB • LOOP. EGGS 
(AC2 «STRA3-EGGS 



(RESTORE AC2 
(AND AC3 
(ANO RETURN 



(SAVE AC2 

(SAVE THE ACCUMULATORS 



(SAVE THE RETURN ADDRESS 



(TAKE EXCLUSIVE OR OF THE 
(DATA FOUND ANO THE EXPECTED 
(DATA 
IAC3*17740e 

(PLACE THE BANK NUMBER AND 

(UUAORANT NUMBER IN BITS 18.15 

(AC0I2B (IS.) 

(LOAD ACS KITH THE STARTING 

(ADORESS OF ERROR DIRECTORY ANO 

(RETURN TO ,*i 

(ADJUST AC3 TO THE RIGHT BANK 



(INCREMENT THE ERROR COUNTER 
(FOR THE FAILING BIT 



(FREZE THE ERROR COUNTER AT 

(77777 

(SKIP IF THE BIT FAILURE HAS 

(ALREADY BEEN REPORTED 

(ACB WILL BE .1 WHEN THE ERROR 

(IS TO BE REPORTEO 

(SKIP IF DATA FOR ALL THE 
(FAILING BITS HAVE BEEN 
(COLLECTED 



(SEE IF ERROR PRINT 
(REUUIREO 



■OUTS ARE 



be 


115 MUS 


;me 




HI 


H566 


177101 




02 


01567 


000000 


CPS*R: 


03 








04 


01570 


177103 




as 


01571 


ISU404 




0b 








5 7 


01172 


001*410 




36 


0157J 


04447 




Hil 








lit 


191174 


»fli><" tits 


SAV0S 


11 


01675 


00D00P 


savi: 


12 


01576 


000*00 


SAV2: 


13 


01177 


000000 


TSTNMI 


1* 


Dl6f!D 


000000 


EHLOCl 


11 








16 








17 


01601 


177400 


M377I 


16 








IB 


016B2 


030765 




20 








21 


mt>03 


034425 




22 


01604 


157404 




2 3 


eibei 


063077 




24 


01606 


046770 




25 


U1607 


1924422 




26 


mieia 


004677 


LUA03: 



ADDL 

ISC 



JMP 
J5S 



LDA 

LUA 

AND 

HALT 

S1A 

LDA 

J5R 



3,3, SUP 



3,3,5NC 
B,B, SZR 



M377*l-.,1 

PUCT-..1 



3,3 

2,CPS*R-.,1 

3,N1B0B-.,1 
2, 3, SZR 

1,»SAV2-,,1 
1,DEGGS-.,1 

LQA04-,,1 



(THIS LOCATION KILL HAVE A 

(COPY OF »S«REG» 

|SKJP IF NOT 

ISKIP IF THIS BIT HA5 FAILED FOR 

(THE FIRST TIME 

(PRINT THt FOLLOWING LOCATIONS 

(IN OCTAL ANO RETURN TO "N377" 

IOATA FOUNO 

(EXPECTED DATA 

(FAILING LOCATION 

(TEST NUMBER 

(LOCATION WHERE ERROR WAS 

(DETECTED 

(BIT B OF THIS LOCATION SHOULD 

(BE 1 (M377 ■ 1774B8) 

(CHECK IF HALT ON ERROR IS 

(REQUIRED 

(AC3 ■ IBBB 

(SKIP IF NOT 

(RESTORE THE FAILING LOC. 
(AC1 • L0AD3*1-CEGGS) 



10036 MUS 
01 

32 
03 

04 

ai 

06 

*7 

06 

09 01611 

lei 01612 

11 01613 

12 01614 

13 01615 

14 01616 

15 01617 
!6 0162a 
17 01621 

16 01622 
19 01623 
20 

21 

22 01624 

23 01625 

24 01626 

25 01627 
26 

27 01630 

28 01631 

29 01632 

30 01633 

31 01634 

32 01635 



050674 MESS: 

054674 

030766 

150000 

034671 

021400 

143705 

070406 

151212 

101301 

010663 



(♦MtSSAGE PRINT-OUT ROUTINE 
I .... — ... ——-——----- 

(•THIS ROUTINE PRINTS THE ASCII MESSAGE RESIOING AT CALL 
(•LOCATION • !. THE MESSAGE SHOULO TERMINATE IN A ZERO 
(•BYTE. AC0 ANO AC3 ARE DESTROYED, ACB RETURNS WITH B, 



ST» 

S1A 

LDA 

COM 

LDA 

LDA 

ANDS 

JMP 

MOVR* 

MOVS 

1SZ 



0(14466 

BB0767 
030657 
0B1401 

001000 N1BB»I 
DB1214 OEGGSl 
000606 0STRA3I 
0B00B0 ERSV2I 
000020 N16.I 
0PB8BB RTEfcRI 



2,STRA2-.,1 
3,RTMES-.,1 
2,M377-.,l 

2.2 

3,RTMES-.,1 

0,B,3 

2,B,SNR 

,*S».,1 

2,2,SZC 

B,B,SKP 

RTMES-,,1 



JSR PRINT-. ,1 

JMP MtSS*S-,,l 

LDA 2,STRA2-.,1 

JMP 1,3 

10BB 

L0AD3*1-EGGS 

STRA3-EGGS 

B 

16. 



(SAVE AC2 

(SAVE THE RETURN ADDRESS 

[AC2«1774BB 



(HEAD THE CHARACTER TO BE TYPED 

(UNLESS IT IS B 



(IF THE LEFT BYTE WAS READ THEN 
(THE NEXT CHARACTER WILL BE THE 
(RIGHT BYTE OF THE NEXT WORD 



(RESTORE ACS 
(RETURN 



10 
02 

03 
04 

06 
as 
a7 
as 
as 

10 

11 

12 
13 
1« 
15 
16 
1/ 
18 
16 
20 
21 
22 
23 
24 
25 
26 
27 
26 
25/ 
3*1 
31 
32 
33 
34 
35 
36 
37 
3b 
39 
4a 
a 
42 

43 

44 

ts 

46 
47 

46 
49 

sa 

SI 
52 
53 
34 
55 
5b 
57 
56 
59 
Old 



037 MUSME 



01636 030475 PDEC: 

01637 020413 
0164a 126403 

01641 000404 

01642 024473 poct: 

01643 152620 

01644 023470 
0164b 040471 

01646 044473 

01647 054470 

01650 004741 

01651 106615 PTXTI 
000012 

01653 00041? 

001652 M12» 

01654 010463 PUCTl: 

01655 036462 

01656 175526 



01667 
01660 
01661 

01663 
01664 
01665 
01666 
01667 
0167b 
01671 
01672 
01673 
01674 
01675 
01676 



002460 

M04732 

026640 ncTXT: 

000240 

034456 PUCT2: 

026453 

000405 

146400 

10141' 1 

151235 

034444 PJCT3I 

146453 

000773 

163005 

0206ed 

054444 



(•OCTAL AND OECIMAL TYPE-OUTS 
fa... ..—..—..._..„....„. 

(• 

(•THIS ROUTINE IS USED TO PRINT STRING OF NUMBERS 

(•SEPARATED BV « - «, THESE NUMBERS SHOULD (IE STORED 

(•AFTER CALLING LOC. 

(•THE TYPE OUT IS TERMINATED ON SEEING A NUMBER, 

(•OTHER THAN THE ONE AT CALLING LOCATION ♦ I, MITH 

(•BIT « 1, CONTROL HETURNS TO THE LOCATION KITH 

(•BIT » 1. 

(•"POCT" ENTRY ALLOWS THE TYPE OUT OF NUMBERS IN 

(•OCTAL WITHOUT SUPPRESSING THE LEADING ZEROS, 

(•"PDEC" ENTRY ALLOWS THE TYPE OUT OF NUMBERS IN 

(•DECIMAL, LEADING ZEROS SUPPRESSED. 

(•IN BOTH OF THt CASES ONLY FIRST NUMBER TO BE TYPED 

(•CAN HAVE BIT AS ONE. 

(•A RETURN AND LINE FEED IS TYPED BEFORE THE FIRST 

(•NUMBER, 

(•ALL OF THE ACCUMULATORS ARE DESTROYED. 

(•AC2 RtTURNS WITH 0. 



LDA 

LDA 

SUB 

JMP 

LDA 

SUtUR 

LDA 

STA 

STA 

STA 

J5R 
.TXTE 

JMP 

PTxm 

ISZ 

LDA 
INCZL 

JMP 
J5H 
.TXTE 

LOA 

LDA 

JnP 

SUB 

INC 

HOVZR* 

LUA 

SuBU* 

JMP 

AuD 

LUA 

STA 



2,010000-., 1 

0.N12-..1 

1,1 

.**-., i 

1,C60-.,1 

2,2 

0,N10-.,1 
0,D1VDN-.,1 
l,ZSUPP-.,l 
3,RT0CT-.,1 

MfcSS-,,1 
/«15>«1»>«12>/ 

P0CT2-.,1 



RT0CT-.,1 

3,#KT0CT-.,1 

3,3,StZ 

0HTUCT-..1 
MESS+1-,,1 
/ - / 

3,ZSURP-.,1 

l,»RTOCT-.,l 

.♦5-..1 

2,1 

0,0, SKP 

2,2,SNR 

3,C60-,,1 

2,1,SNC 

.-5-., I 

3,0,SnR 

0,N40-.,1 

3,ZSUP1-.,1 



(AC2 • 100 
IAC0*12 



(a:i«60 

(AC2-100000 
(AC0 • 10 



("RTOCT" WILL CARRY THE ADDRESS 
(OF THE NUMBER TO BE PRINTEO 



(FETCH THE NEXT WORD 

(RETURN WITH BOTH AC3 AND CARRY 

(NON ZERO 

(RETURN 

(PRINT » - » ANO LOAD AC2 



(FETCH THt NUMBER TO 6E PRINTED 



(AC0»DIGIT TO BE PRINTEO 

(SKIP IF THIS IS THE LAST DIGIT 

(AC3>68 



(FORM THE DIGIT 



0038 MUSME 


01 


01677 


004413 


02 


01700 


141000 


03 


01701 


151225 


04 


01702 


000752 


05 






06 


01703 


152400 


07 


01704 


034432 


ne 






*9 


01705 


151400 


10 


01706 


162404 


11 


01707 


000776 


12 


01710 


034432 


13 


017U 


000757 



JSR 


PRINT-., 1 


HOV 


2," 


MUVZR 


2,2,SNR 


JMP 


PUCTl-., 1 


SUB 


2,2 


LUA 


3,0IVUN..,1 


INC 


2,2 


SUB 


J,0,SZfl 


JMP 


.-2-.,l 


LDA 


3,ZSUP1-.,1 


JMP 


PfaCT3-l-.,l 



(PRINT A DIGIT OR A SPACE 



(IF ALL OF THE DIGITS HAVE BEEN 
(PRINTED THEN JUMP 



(AM ■ 10 FOR OCTAL TYPE OUT 
(AND 12 FOR DECIMAL 



(RESTORE ACS 



IBB39 MOSnE 

01 
02 

03 

05 



(•PRINT ROUTINE 
j .............. 

(• 

(.THIS ROUTINE IS USED 

(•AND LPT DEPENDING ON 

(• 



07 

06 Kl« 71 Z 

09 01713 

ib am* 

11 10171b 

12 

13 01716 

14 01717 

15 0172B 

16 01721 

17 01722 
IS 

19 01723 

20 01724 
SI 

22 01726 

23 01726 

24 81727 

25 0173m 

26 01731 

27 01732 
26 

29 B1733 
3* 01734 

31 01735 

32 01736 

33 01737 

34 01740 
36 B1741 

36 01742 

37 01743 
36 

39 

40 

41 01744 

42 

43 

44 

45 

46 

47 

48 

49 

SB 

31 

92 B1757 

53 

54 

55 

56 

57 

56 

59 

SB 



054426 PKINTI 
034654 
1771BB 
176102 

000405 
B61111 
S163511 
000777 
060211 

17710B PRLPTl 
1751B3 

002413 
061117 
063517 
000777 

B6B217 

002406 

82342B D1BBBBI 
0BB010 N1BI 
000060 C6B> 
BB0BBB DIVUNI 
0B0B00 RTOCTl 
0BBB0B RTPRN1 
BBB0B0 ZSUPP: 
000000 ZSUP1I 
0BS401 HSTKYI 



ST» 
LDA 
»DDU 
MOVL 

JHP 

0045 

3KPBZ 

JHP 

N1QC 

AUOL 
MOVL 

JMP 

DOtS 

SKPBZ 

JHP 

NIOC 

JHP 

10000, 

IB 

6B 


B 



JSR 



.TXT 



3,RTPKN-.,l 
3,CPSHR-,,l 
3,3 
3,3iSZC 



TO OUTPUT A CHARACTER TO THE TTY 
THE SETTING OP THE SWITCHES. 



(SAVE THE RETURN AOURESS 



IREAO SNITCH 2 FOR PRINT-OUTS 
|TO TTY 



.1 



PHLPT- 
B.TTO 
TTO 
.-1 

TTO 

3,3 

3,3,SNC 

#RTPRN-.,1 

B.LPT 

LPT 

.-1 

LPT 

•RTPRN-,,1 



(OUT-PUT THE CHARACTER 



IREAO SWITCH 5 FOR PRINT-OUTS 
ITO LPT 



(RETURN 



1,3 



116 WORO/K OF HEHORT WILL BE 
IADOEO FROH HERE ON FOR ERROR 

(COLLECTION 



1447503 

B5492B 

044522 

U441B7 

02*124 

B4145B 

02BBS1 

B435B4 

B261B3 

030440 

B33471 

B40466 ALL RIGHTS RESERVED./ 

B46114 

B51B4B 

B43511 

B5211B 

B2B123 

B42S22 

B42523 

B93122 



/COPYRIGHT CO OGC, 1976 



£040 MUSME 






01 




042105 






02 




000056 






03 










04 


B1772 


14/515 


OIRTI 


.TXTE 1H0SMEH 


05 




046523 






B6 




046705 






07 




120240 






16 




030240 






09 




000000 






IB 


02000 


00(5000 







11 


02001 


000201 




START 


12 


02002 


000B02 




2 


13 


B2B73 


BB0300 




300 


14 


02B04 


BB0B0B 







15 


02005 


000000 







16 


B2006 


0BB080 







17 


02007 


000000 







16 










19 




17776B 


AA« 


RTRN*1-EG6S 


20 




0B016B 


AB« 


LOOP-EGGS 


21 




000012 


BB« 


MES5-TSTNH 


22 




BBBB42 


CAi 


HXMEM-CCALCAT*!) 


23 




000035 


CB» 


TEHPA-tCALCAT*!) 


24 




B0B037 


CC» 


HIGHM-CCALCAT+1) 


25 




B00B41 


CDi 


ENOPRG-ICALCAT*!) 


26 




177774 


DA» 


TEHP1-IL0AD9*!) 


27 




17777B 


0B« 


$TRA3-U0A05*1) 


26 




177801 


Ha 


ENOCLM-PNTR 


29 




000003 


X" 


IRESTR-B 


3B 




177713 


Y« 


BKGNO-PNTK 


31 




0PB176 


Z« 


tstnh-pntr 


32 




177650 


HM> 


CPUSR-PNTR 


33 




0B0166 


xx« 


CPSWR-PNTR 


34 




1777S1 


YB« 


TPMl-PNTR 


35 




177602 


YY" 


STRA3-PNTH 


36 




1776B4 


ZZ> 


EnDBNK-PNTR 


37 










36 




001504 


INBGNa 


STRA1 


39 




0B15B5 


LAST' 


STRA2 


40 




U015B6 


COUNT" 


RTHES 


41 










42 








.END 



••00B00 TJTAL ERRORS, BBB0U PASS I ERRORS 



0041 MOSME 

* 0B0H13 



AA 


17778a 


»e 


00016*1 


B 


808B14 


BANK 


000113 


8B 


000012 


81TNK 


! ttllll 


BKGNO 


A01J14 


8KPAT 


000407 


8TCNT 


000046 


BTN1 


001252 


BTMEM 


00072«j 


C1777 


0B0744 


C377 


000263 


C60 


001735 


C» 


000042 


CALCA 


000346 


CATS* 


000377 


CB 


000B35 


cc 


000037 


CD 


000041 


CLEAN 


000307 


CNTRC 


001355 


CONT 


000340 


CONT1 


000347 


COUNT 


001306 


CPSwR 


001367 


CPUSR 


001251 


01000 


001733 


OA 


177774 


DB 


17777B 


otsus 


0B1631 


DGBGN 


001206 


OGBuT 


001204 


DGCHK 


00U60 


OGNOL 


001015 


OGRIT 


001026 


ObNN 


001013 


DIREC 


0B1364 


OIRT 


8B1772 


OIVON 


001736 


OPNTR 


008627 


OSTRA 


001632 


DTSTN 


000632 


EGGS 


000375 


END6 


001072 


END7 


001173 


ENDS* 


001203 


ENOCI. 


001202 



2/20 


2/27 


2/29 


2/30 


2/31 


2/53 


3/09 


3/12 


3/18 


3/21 


3/33 


4/53 


3/10 


5/24 


5/26 


3/27 


3/31 


6/01 


19/01 


19/85 


19/37 


20/05 


28/26 


21/05 


21/22 


22/05 


22/37 


23/05 


23/32 
30/37 


24/06 
31/86 


23/ld 


26/05 


28/49 


29/05 


29/06 


34/07 


48/19 












34/U 


48/20 












6/01 


19/ea 


20/03 


21/05 


22/05 


23/05 


i24/05 


26/05 


29/05 


29/06 


31/03 








3/43 

9/46 


3/46 
B/46 


3/47 


3/49 


3/51 


9/13 


9/28 


16/44 


40/21 












3/43 


3/45 


9/16 


9/25 


9/38 






26/32 
34/08 


27/20 
40/30 


29/38 


29/36 


30/06 


32/13 


33/16 


14/19 


16/39 


17/19 










8/03 


9/18 


9/39 










26/06 


26/23 


27/38 


28/48 


31/07 


31/14 


Sl/53 


16/28 
22/15 


17/07 
22/29 


17/80 


20/24 


22/19 


23/22 




12/15 


13/26 












37/27 


37/56 


39/31 










6/53 


40/22 












13/12 


40/22 


40/23 


40/24 


40/25 






11/08 


12/30 


13/08 


14/04 








6/56 


40/23 












6/51 


40/24 












6/5B 


40/25 












12/37 


12/43 












31/07 


32/40 












10/17 


13/05 


13/19 










13/03 


13/13 












31/24 


32/04 


32/12 


32/19 


40/40 






34/38 


35/02 


33/19 


39/09 


40/33 






28/47 


29/17 


40/32 










37/23 


39/29 












31/19 


40/26 












31/29 
36/25 


31/33 
36/28 


31/36 


31/42 


31/48 


32/02 


48/27 


24/22 


24/26 


23/08 


26/13 


27/14 


27/54 


23/08 


28/42 


29/13 


29/57 










24/19 
24/50 


24/26 
25/86 


26/08 


27/17 


27/52 


29/15 


30/21 


24/15 


25/15 












24/29 


24/36 


25/02 


25/07 


25/12 , 






23/31 


24/24 


24/33 


25/06 








31/08 


31/18 


32/32 










6/04 


40/04 












37/30 


38/07 


39/32 










17/16 


18/85 












34/12 


36/29 












16/37 


18/06 












8/82 


11/20 


12/08 


12/47 


14/02 


36/28 


36/29 


40/19 


40/20 












25/10 


23/17 


27/37 










27/37 


30/33 












24/46 


2S/10 


27/53 


29/23 


40/36 






24/15 


24/53 


26/42 


27/50 


28/84 


29/14 


2 Si/58 



0042 nOSiME 


ENDGL 


. 0U1347 


ENDP* 


. 000463 


Endpk 


1 000410 


EUP 


000136 


ERLUC 


00160B 


ERR1 


001527 


EKR2 


001472 


ERRA 


001552 


ERRb 


001562 


ERSH0 


000077 


ERSM1 


000104 


ERSUH 


000075 


ERSV2 


001633 


ERTMS 


000114 


GALP1 


001256 


GALP2 


001274 


GALP3 


0B1301 


GALP4 


001323 


HIGHM 


000406 


HIMtM 


000262 


H5TRY 


001743 


IEGGS 


000045 


IhSTR 


000002 


IMESS 


000371 


INBGN 


001304 


INPAS 


000137 


IPDEC 


0B0174 


IPOCT 


008175 


IPR1N 


800167 


IREST 


000B03 


JP1ER 


001057 


JP2ER 


001250 


JP3ER 


0B1353 


JPRT1 


000731 


LAST 


001505 


L0AD3 


001610 


LUAD4 


00150/ 


LDAB5 


001212 


IUMEM 


000261 


LOOP 


000553 


ICHM 


000405 


M377 


001601 


M4 


0B1411 


M7776 


000115 


MAXSV 


000253 


«tss 


001611 


MMRST 


000361 


MRChl 


00077! 


"IXMEN 


000411 


N10 


801734 


N1000 


B01630 


N12 


001632 


N15 


000165 


N16, 


001634 


N17 


000440 



31/27 


40/28 








30/09 


30/30 


32/41 






13/17 


15/40 








13/81 

9/56 

33/13 


13/31 


13/32 


14/21 


15/18 


33/23 


34/05 


34/20 


33/14 


38/36 


32/18 


33/18 


33/24 


34/28 


29/54 


33/13 








34/42 


34/38 








34/43 


34/54 








9/14 


9/54 








9/19 


9/40 








9/12 


15/36 








34/16 


34/21 


36/30 






3/43 


3/33 


9/21 


9/22 


9/31 


29/14 


30/27 








29/36 


30/15 


30/22 






29/43 


30/04 








30/06 










12/32 


14/17 


16/06 


48/24 




8/21 


9/51 


11/37 


12/14 


12/31 


6/1,7 


34/36 


39/37 






6/60 


6/02 


18/86 






6/1.7 


8/14 


12/27 


13/48 




6/22 


9/60 


11/24 


11/31 


11/42 


18/17 


13/37 








32/01 


32/16 


32/23 


48/38 




9/56 


11/30 


12/87 


12/26 


13/89 


9/23 


9/56 


11/12 






11/13 


12/12 








6/31 


18/23 








6/18 


13/13 


40/29 






19/27 


20/11 


21/88 


22/23 


23/11 


25/04 


27/25 


28/46 






26/46 


30/36 








21/14 


22/36 


23/28 


23/17 




4/58 


31/56 


32/88 


48/39 




35/26 


36/26 








34/03 


35/26 








26/02 


31/13 


.11/44 


40/26 


40/27 


8/13 


11/49 


12/13 


12/29 




4/16 


4/53 


4/34 


17/84 


48/20 


12/30 


14/13 


16/20 


16/25 




34/31 


35/07 


35/17 


36/U 




31/23 


31/46 








6/36 


9/32 








8/24 


12/85 








13/37 


36/09 


36/2Ji 


37/34 


37/46 


13/2> 


13/33 








23/0' 


23/20 


23/2fe 






12/05 


12/46 


13/05 


13/33 


13/34 


40/24 










37/2!i 


39/30 








35/21 


36/27 








37/24 


37/39 








6/32 


10/23 








34/35 


36/31 








15/0,1 


16/33 









16/12 40/25 



11/98 11/38 



13/44 



23/84 



0H4J 


MOSME 


N177 


000166 


N1777 


000372 


ma 


000374 


N3 


000733 


"137 


000631 


N4 


K00734 


N40 


0015&3 


N4SI0IF 


000632 


N3 


000735 


N6 


H00736 


Nt>0 


000047 


N7 


001201 


N7777 


000373 


NEXT 


000530 


NXTl 


000544 


NXT0N 


001166 


NXTCl 


eei363 


NXTST 


000500 


OCTXT 


001661 


OFF 


000170 


ON 


000171 


OPR1N 


000012 


OTHIN 


000227 


PASS 


000400 


PDEL 


8)81636 


PNTR 


001401 


POCT 


001642 


POCTI 


001654 


POCT2 


001663 


P0CT3 


901671 


PRINT 


001712 


PKLPT 


801723 


PTXT 


001651 


OUAD 


000112 


RDRC1 


001127 


RDRC2 


001223 


RDRC3 


001174 


RUNC4 


001210 


RURC9 


001216 


RDRCH 


001191 


RELET 


00(1441 


RELTG 


000412 


RESTR 


000502 


RETUR 


000401 


RITlS 


000392 


RIT6L 


001074 


RTERR 


001639 


RTINO 


000004 


RTMES 


001906 


RTOCT 


001737 


RTPRN 


001740 


RTRN 


000394 



6/28 

12/92 

9/17 

21/13 

17/38 

21/19 

31/10 

15/50 

21/20 

21/21 

6/36 

27/36 

13/311 

18/37 

16/43 

26/30 

31/15 

17/03 

37/47 

11/07 

2/24 

4/19 

4/94 

6/26 

11/42 

2/25 

9/32 

11/12 

18/05 

40/34 

11/13 

37/41 

37/37 

37/95 

3/10 

4/27 

39/13 

37/39 

3/43 

26/46 

26/45 

26/46 

26/46 

26/97 

27/16 

13/13 

13/14 

6/18 

14/07 

16/59 

26/08 

34/16 

6/19 

19/41 

33/29 

37/32 

39/08 

10/11 



10/12 
13/06 
12/37 
21/18 
16/07 
22/35 
32/11 
18/06 
23/27 
23/16 
8/04 
27/49 
16/09 
19/17 
16/52 
27/31 
32/36 
16/06 



3/10 
4/22 
5/31 
6/49 

3/33 
14/03 
37/23 
31/35 
40/35 
35/08 
36/04 
37/49 
38/13 

4/20 

4/28 
39/19 
37/39 

3/46 

28/12 
26/51 
27/01 
28/06 
27/30 
16/24 
13/22 
16/06 

21/16 

27/35 

34/25 

6/21 

36/10 
37/41 
39/22 
13/20 



10/24 12/33 12/49 

13/38 

13/40 16/52 



33/26 37/59 



19/17 20/22 

3/15 3/16 3/21 3/33 4/16 

4/27 4/26 4/29 4/30 4/53 
11/06 

3/35 4/25 4/26 5/30 9/31 



40/26 40/30 40/31 40/32 40/33 

40/36 
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